home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine 1996 / ARCHIVE_96.iso / discs / mag_discs / volume_9 / issue_04 / gerald / Iteration / Root2 < prev   
Text File  |  1995-11-18  |  2KB  |  115 lines
  1. %OP%VS4.13 (28-Apr-92), Gerald L Fitton, R4000 5966 9904 9938 
  2. %OP%TNN
  3. %OP%WRN
  4. %OP%DP4
  5. %OP%IRN
  6. %OP%GRY
  7. %OP%PL0
  8. %OP%HM0
  9. %OP%FM0
  10. %OP%BM0
  11. %OP%LM4
  12. %OP%PT1
  13. %OP%PDPipeLine
  14. %OP%WC66,1130,336,988,1,7,0,0
  15. %CO:A,12,0%%CO:B,12,24%
  16. Find the square root of
  17.  
  18.  
  19. %R%Low
  20.  
  21. %V%%R%1
  22. %V%%R%if(E7>D$2,B7,C7)
  23. %V%%R%if(E8>D$2,B8,C8)
  24. %V%%R%if(E9>D$2,B9,C9)
  25. %V%%R%if(E10>D$2,B10,C10)
  26. %V%%R%if(E11>D$2,B11,C11)
  27. %V%%R%if(E12>D$2,B12,C12)
  28. %V%%R%if(E13>D$2,B13,C13)
  29. %V%%R%if(E14>D$2,B14,C14)
  30. %V%%R%if(E15>D$2,B15,C15)
  31. %V%%R%if(E16>D$2,B16,C16)
  32. %V%%R%if(E17>D$2,B17,C17)
  33. %V%%R%if(E18>D$2,B18,C18)
  34. %V%%R%if(E19>D$2,B19,C19)
  35. %V%%R%if(E20>D$2,B20,C20)
  36. %V%%R%if(E21>D$2,B21,C21)
  37. %V%%R%if(E22>D$2,B22,C22)
  38. %V%%R%if(E23>D$2,B23,C23)
  39. %V%%R%if(E24>D$2,B24,C24)
  40. %CO:C,12,0%
  41.  
  42.  
  43.  
  44. %R%Guess
  45.  
  46. %V%%R%(B7+D7)/2
  47. %V%%R%(B8+D8)/2
  48. %V%%R%(B9+D9)/2
  49. %V%%R%(B10+D10)/2
  50. %V%%R%(B11+D11)/2
  51. %V%%R%(B12+D12)/2
  52. %V%%R%(B13+D13)/2
  53. %V%%R%(B14+D14)/2
  54. %V%%R%(B15+D15)/2
  55. %V%%R%(B16+D16)/2
  56. %V%%R%(B17+D17)/2
  57. %V%%R%(B18+D18)/2
  58. %V%%R%(B19+D19)/2
  59. %V%%R%(B20+D20)/2
  60. %V%%R%(B21+D21)/2
  61. %V%%R%(B22+D22)/2
  62. %V%%R%(B23+D23)/2
  63. %V%%R%(B24+D24)/2
  64. %V%%R%(B25+D25)/2
  65. %CO:D,12,0%
  66. %V%%R%2
  67.  
  68.  
  69. %R%High
  70.  
  71. %V%%R%2
  72. %V%%R%if(E7>D$2,C7,D7)
  73. %V%%R%if(E8>D$2,C8,D8)
  74. %V%%R%if(E9>D$2,C9,D9)
  75. %V%%R%if(E10>D$2,C10,D10)
  76. %V%%R%if(E11>D$2,C11,D11)
  77. %V%%R%if(E12>D$2,C12,D12)
  78. %V%%R%if(E13>D$2,C13,D13)
  79. %V%%R%if(E14>D$2,C14,D14)
  80. %V%%R%if(E15>D$2,C15,D15)
  81. %V%%R%if(E16>D$2,C16,D16)
  82. %V%%R%if(E17>D$2,C17,D17)
  83. %V%%R%if(E18>D$2,C18,D18)
  84. %V%%R%if(E19>D$2,C19,D19)
  85. %V%%R%if(E20>D$2,C20,D20)
  86. %V%%R%if(E21>D$2,C21,D21)
  87. %V%%R%if(E22>D$2,C22,D22)
  88. %V%%R%if(E23>D$2,C23,D23)
  89. %V%%R%if(E24>D$2,C24,D24)
  90. %CO:E,12,0%
  91.  
  92.  
  93.  
  94. %R%Square
  95.  
  96. %V%%R%C7^2
  97. %V%%R%C8^2
  98. %V%%R%C9^2
  99. %V%%R%C10^2
  100. %V%%R%C11^2
  101. %V%%R%C12^2
  102. %V%%R%C13^2
  103. %V%%R%C14^2
  104. %V%%R%C15^2
  105. %V%%R%C16^2
  106. %V%%R%C17^2
  107. %V%%R%C18^2
  108. %V%%R%C19^2
  109. %V%%R%C20^2
  110. %V%%R%C21^2
  111. %V%%R%C22^2
  112. %V%%R%C23^2
  113. %V%%R%C24^2
  114. %V%%R%C25^2
  115.