File GFI.FC (FOCAL source file)

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

()0E9BTC-PS/8 FOCAL, 1971?MB^DBA TE,X,A,B,!!?MB0DDS P=1;I (A*B*X)6.02,6.02,2.06?MB>DFI (TE-2)4.16,2.20,2.30?MCHDTS X=X/A;G 4.16?MCOD^S X=X*X?MCHPS AA=2.0/(9.0*A);S BB=2.0/(9.0*B)?MDBHQS X1=FEXP(0.333333*FLOG(X));S X2=FEXP(0.666667*FLOG(X))?MDYHRS Z=((1.0-
B)*X1-1.0+AA)/FSQT(BB*X2+AA)?MD	HTI (B-4)4.22,4.23,4.23?MD6HVS Z=Z*(1.0+0.08*Z^4/B^3)?MEBHWS Z1=Z;S Z=FABS(Z)?MEHXS P=0.5/(1+Z*(0.196854+Z*(.115194+Z*(.000344+Z*.019527))))^4?ME0HZI (-Z1)6.02;S P=1-P?MLBT %8.06,P,!!?M!!L S GFI?M? ?

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