static u3_noun
_play_grow(u3_noun van,
u3_noun sut,
u3_atom mel,
u3_noun ruf,
u3_noun dab)
{
u3_noun dan = _play_in(van, sut, ruf);
return _play_core(dan,
u3nt(u3k(mel),
u3k(dan),
u3nc(u3nc(u3_nul, u3_nul),
u3k(dab))));
}
static u2_noun
_play_grow(u2_wire wir_r,
u2_noun van,
u2_noun sut,
u2_atom mel,
u2_noun ruf,
u2_noun dab)
{
u2_noun dan = _play_in(wir_r, van, sut, ruf);
return _play_core
(wir_r, dan,
u2_bt(wir_r, u2_rx(wir_r, mel),
u2_rx(wir_r, dan),
u2_bc(wir_r, u2_bc(wir_r, u2_nul, u2_nul),
u2_rx(wir_r, dab))));
}
