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

()0I;BTC-PS/8 FOCAL, 1971?MBXBEE?MB-BJA 
KOLUMNS ROWS 
,!,
OBSERVATIONS 
?MB:BTF A=1,1,RO;T !;D 10?MF-B^F A=1,1,KO;S QR=QR+SK(A)^2/OB*RO?MGPDYS B=B-SV;S SV=SS-B;S X=B-SR-QR?MGUD2T !, %8.04,"ROWS       ",SR,%2.00,RO-1,%8.04,SR/(RO-1)?MDZEKT X*RO*KO*(OB-1)/(KO-1)*(RO-1)*SV,!,"SUBTOTAL   ",B?MG2EPT %2.00,KO*RO-1,%8.04,B/(KO*RO-1)
?MHKEZT SV,%2.00,KO*RO*(OB-1),%8.04,SV/KO*RO*(OB-1),!?MESFES SX=0;S XX=0?ME(FJF C=1,1,OB;A X;S SX=SX+X;S XX=XX+X*X?ME8FTS RR=RR+SX;S K(B)=SK(B)+SX?MFFF^S SV=SV+SX;S SS=SS+XX?MF]F(S SB=SB+SX^2/OB?MTTS SR=SR+RR^2/OB*KO?MFQTJS RR=0;F B=1,1,KO;T !;D 3?MF=B(S 
V=SV^2/OB*KO*RO;S B=SB?MCMDTS SR=SR-SV;S QR=QR-SV;S SS=SS-SV?MH"D^T !!?MH>D7T RO*KO*(OB-1)*SR/SV*(RO-1),!,"KOLUMNS    ",QR,%2.00?MD.EUT B*RO*KO*(OB-1)/SV*(KO*RO-1),!,"WHITHIN    ?MEIE
T "TOTAL      ",SS,%2.00,KO*RO*OB-1,!!;Q?MC
D(T !, "SOURCE      SS          DF       MS        F?MIZD<T KO-1,%8.04,QR/(KO-1),RO*KO*(OB-1)*QR/SV*(KO-1),!?MC=EFT "INTERACTION",X,%2.00,(KO-1)*(RO-1),%8.04,X/(KO-1)*(RO-1)?M?ML S VAR2

Note: Lines longer than 256 characters were wrapped