.DS 
.ft C
#define interp(f, p, q) ((f)*(q)+(1.0\-(f))*(p))

\fBPlayer\fP \fIphrase\fP(0, 24)
{

	\fBP6\fP = \fBRel_time\fP(\fBSelf\fP);
	\fBP4\fP = interp(\fBP6\fP, \fBRhythms\fP("16 4. 8"), \fBRhythms\fP("8 4. 16"));
	\fBP5\fP = interp(\fBP6\fP, \fBPitches\fP("c3 ef3 c4"), \fBPitches\fP("c4 ef3 c3"));
	\fBWait_until\fP(\fBP2\fP = \fBAbs_time\fP() + \fBP4\fP);
}
.ft R 
.DE
