home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
mbug
/
mbug172.arc
/
APL-Z.LBR
/
ATAN.ACO
< prev
next >
Wrap
Text File
|
1979-12-31
|
256b
|
11 lines
Gz^atan b<x<x2
;10[ x^Mb
;20[ x2^x-x
;30[ ~+x'1{/inv
;40[ z^x=1:x2=3:4-x2=5:9-x2=7:16-x2=9:25-x2=11:36-x2=13:49-x2=15
;50[ z^z-"1Pb#0
;60[ ~0
;70[ inv>z^+O0.5--b{*atan=b
;80[ ~0
G