home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Archive Magazine 1996
/
ARCHIVE_96.iso
/
discs
/
gerald
/
9_04
/
Iteration
/
Root2
< prev
Wrap
Text File
|
1995-11-18
|
2KB
|
115 lines
%OP%VS4.13 (28-Apr-92), Gerald L Fitton, R4000 5966 9904 9938
%OP%TNN
%OP%WRN
%OP%DP4
%OP%IRN
%OP%GRY
%OP%PL0
%OP%HM0
%OP%FM0
%OP%BM0
%OP%LM4
%OP%PT1
%OP%PDPipeLine
%OP%WC66,1130,336,988,1,7,0,0
%CO:A,12,0%%CO:B,12,24%
Find the square root of
%R%Low
%V%%R%1
%V%%R%if(E7>D$2,B7,C7)
%V%%R%if(E8>D$2,B8,C8)
%V%%R%if(E9>D$2,B9,C9)
%V%%R%if(E10>D$2,B10,C10)
%V%%R%if(E11>D$2,B11,C11)
%V%%R%if(E12>D$2,B12,C12)
%V%%R%if(E13>D$2,B13,C13)
%V%%R%if(E14>D$2,B14,C14)
%V%%R%if(E15>D$2,B15,C15)
%V%%R%if(E16>D$2,B16,C16)
%V%%R%if(E17>D$2,B17,C17)
%V%%R%if(E18>D$2,B18,C18)
%V%%R%if(E19>D$2,B19,C19)
%V%%R%if(E20>D$2,B20,C20)
%V%%R%if(E21>D$2,B21,C21)
%V%%R%if(E22>D$2,B22,C22)
%V%%R%if(E23>D$2,B23,C23)
%V%%R%if(E24>D$2,B24,C24)
%CO:C,12,0%
%R%Guess
%V%%R%(B7+D7)/2
%V%%R%(B8+D8)/2
%V%%R%(B9+D9)/2
%V%%R%(B10+D10)/2
%V%%R%(B11+D11)/2
%V%%R%(B12+D12)/2
%V%%R%(B13+D13)/2
%V%%R%(B14+D14)/2
%V%%R%(B15+D15)/2
%V%%R%(B16+D16)/2
%V%%R%(B17+D17)/2
%V%%R%(B18+D18)/2
%V%%R%(B19+D19)/2
%V%%R%(B20+D20)/2
%V%%R%(B21+D21)/2
%V%%R%(B22+D22)/2
%V%%R%(B23+D23)/2
%V%%R%(B24+D24)/2
%V%%R%(B25+D25)/2
%CO:D,12,0%
%V%%R%2
%R%High
%V%%R%2
%V%%R%if(E7>D$2,C7,D7)
%V%%R%if(E8>D$2,C8,D8)
%V%%R%if(E9>D$2,C9,D9)
%V%%R%if(E10>D$2,C10,D10)
%V%%R%if(E11>D$2,C11,D11)
%V%%R%if(E12>D$2,C12,D12)
%V%%R%if(E13>D$2,C13,D13)
%V%%R%if(E14>D$2,C14,D14)
%V%%R%if(E15>D$2,C15,D15)
%V%%R%if(E16>D$2,C16,D16)
%V%%R%if(E17>D$2,C17,D17)
%V%%R%if(E18>D$2,C18,D18)
%V%%R%if(E19>D$2,C19,D19)
%V%%R%if(E20>D$2,C20,D20)
%V%%R%if(E21>D$2,C21,D21)
%V%%R%if(E22>D$2,C22,D22)
%V%%R%if(E23>D$2,C23,D23)
%V%%R%if(E24>D$2,C24,D24)
%CO:E,12,0%
%R%Square
%V%%R%C7^2
%V%%R%C8^2
%V%%R%C9^2
%V%%R%C10^2
%V%%R%C11^2
%V%%R%C12^2
%V%%R%C13^2
%V%%R%C14^2
%V%%R%C15^2
%V%%R%C16^2
%V%%R%C17^2
%V%%R%C18^2
%V%%R%C19^2
%V%%R%C20^2
%V%%R%C21^2
%V%%R%C22^2
%V%%R%C23^2
%V%%R%C24^2
%V%%R%C25^2