File CALC1.FT (FORTRAN source file)

Directory of image this file is from
This file as a plain text file

+CB * B 2 GC/LGC6:KP7OKG+ACM+TCO3C7O7PSU7EN 7TCE6 	B6 SS+ECP7POO3I	T+OCN3P?R3BKA3I	L3TWIS*M+CB * B 2 ?F3R& 3NWD3P;E3D;E3T& 3T7E2 	D7FWF3S?I3N6 3OWDL*M* B * B 2 	D3M;E3S?I7NB .(J16)B,.1F("26)*JB1* B 6 J 3ESA. F(*,&2T7H*JB2* B 2 Z 3O7R+ACT6(R	7HSE+A^=.,SF*.
2*MBJ* B * B +DCO*1B0/KF=",64*JB * B 6 J 3ESA. F(*,&33I?PS*M*3B * B 2 ?F3RGM+T" 2	;I3I	T+ACL7POO3I	T/O7N2	&,"26)*JB * B 6 J 3ESA. F(*,&5" 7N*JB5* B 2 Z 3O7R+ACT2(:	*=2	+I&3*MBJ* B * B +DCO*1B1/IF=.,J1*MBJ* B * B 3P&(.)B=".*M*1B1* B 2 ?C3N	T3NWU*MBJ* B * B
3P&(7POO.)F=".*M* B * B 2 ?D. B2. 7M21:,*MBJ* B * B +P"1.16)/PF(*)"**16.+T?H*2&.*+P*2*)+T?H"26.*JB * B 6 B .1F(.26)/PF(*2*)*(:12-T*/:26)B+.(F16)R*/HJ/".*M* B * B 2 ?D. F2. 7I.2F,"1*M* B * B . GP*(	I*=P/IF-6)R*/HJ/6.B+*(	I.*F(6.R-+H.)3P&(*+&12*T*/:2.MJJ*1B
* B 3C;O3T;IU7E*JB * B 2 R /OJ 22& *=21"162*JB * B 6 B *(	I.=GP*(	I.MJJ*2B * B 3C;O3T;IU7E.JB2* B 2 N 7OSN7IWNE*M* B * B 6 KW3IWT. F(*,&46 B(*(	I.,7I.1F,"26)*JB4* B 2 Z 3O7R+ACT.(J1+F:4"26).JB1* B 2 N 7OSN7IWNE*M* B * B 6 KW3IWT. F(*,&6.MZJ* B * B 7FKO7MS
* >(")*M* B * B 2 ?G2 ?T" 61*JB * B 6 N 7TCO*MBJ* B * B 3ESN"M2JBZ

Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search