home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / mbug / mbug172.arc / APL-Z.LBR / ASIN.ACO < prev    next >
Text File  |  1979-12-31  |  256b  |  11 lines
  1.       Gr^asin b
  2. ;10[ ~+1#b{/err
  3. ;20[ ~+1%Mb{/one
  4. ;30[ r^atan b=+1*b-b{P0.5
  5. ;40[ ~0
  6. ;50[ one>r^0.5-O-b
  7. ;60[ ~0
  8. ;70[ err>Kdomain errorK
  9. ;80[ ~
  10.       G