home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.6 / ffcollection-1-6-1993-02.iso / ff_disks / 061-090 / ff_070.lha / Logo / logo.2 < prev    next >
Text File  |  1987-05-02  |  309b  |  10 lines
  1. to poly1 :x :y :z fd :x lt :y poly1 :x+:z :y :z end
  2. to poly :x :y :z cs pd poly1 :x :y :z
  3. to demo 
  4.    print ['    Type in: ']
  5.    print ['         poly 3 145 3   ']
  6.    print ['to get the poly function. ']
  7.    print ['    Change the numbers and see what you get (especially']
  8.    print ['the middle one!)']  
  9. end
  10.