> .P>> > LFX )> > > )> 0>> )> > > >)> > <* 0.5 <+ !.YM>>)> NAS LSC <- <.N .X> <1 .HPTS> >> 500>>> <- <.N .Y> <2 .HPTS> >> 400>>> > >> )> <- 0.0 <1 .HPTS>>> 500>>> >> > )> )> <- 0.0 <2 .HPTS>>> 400>>> >> > )> )> " YMAX " <2 .YM> " SCALE " .SCALE )> >>> ) (BIG <1 .X>) (SMALL <1 .X>)) .BIG> > )> .SMALL> > )> > )> >>> "MOBIUS TRANGLE" >> .Y> > >>> >>>> SET Q <+ .Q .I>> > )> >>>> .Y> > >>> >>>> > > )> >>>> >> )> > )> > )> )> > >)> >>>> >>>> >>>> ) >> >> )> > LOOP <.N .Y>> )> > )> ZAP >>> >>>>> )> > >>> >> )> >> > >> > > LOOP <- .X 500>> 40>> > )> > >>> > > > >>> LOOP <- .X 500>> 10>> > > > )> > >>> LOOP 10>> > )> > >>> > > >>> > LOOP )> ;"ALL GOOD FUNCTIONS RETURN SOMETHING THEREFORE SEND RETURNS 1." >> > >>> >> >> >> >> >> > > > > >>>