1*44100Sbosticwhatis simple 2*44100Sbosticwhatis $$simple 3*44100Sbosticwhatis First 4*44100Sbosticwhatis Second 5*44100Sbosticwhatis $$first 6*44100Sbosticwhatis $$second 7*44100Sbosticstop in UseRecurStructs 8*44100Sbosticrun 9*44100Sbosticstep 10*44100Sbosticstep 11*44100Sbosticstep 12*44100Sbosticstep 13*44100Sbosticstep 14*44100Sbosticprint b 15*44100Sbosticprint b.p 16*44100Sbosticprint *(b.p) 17*44100Sbosticprint b.p.b 18*44100Sbosticprint b.p.c 19*44100Sbosticstop in f 20*44100Sbosticcont 21*44100Sbosticwhere 22*44100Sbosticstep 23*44100Sbosticstep 24*44100Sbosticstep 25*44100Sbosticstep 26*44100Sbosticstep 27*44100Sbosticstep 28*44100Sbosticprint y 29*44100Sbosticprint *y 30