|
|
1.1 ! root 1: 1 ! 2: FEDERAL SOFTWARE TESTING CENTER ! 3: FORTRAN COMPILER VALIDATION SYSTEM ! 4: VERSION 2.0 82/08/02*18.33.46 ! 5: ! 6: *FM900BEGIN* TEST RESULTS - FM900 ! 7: ! 8: TEST DATE*TIME= 07-Nov-85 - COMPILER= CCI 5.2 ! 9: ! 10: FMTRWF - (021) FORMATTED I/O ! 11: ! 12: REFS - 12.9.5 13.3 13.5 ! 13: ! 14: ! 15: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 16: ------------------------------------------------------------------------------- ! 17: THIS PROGRAM HAS 36 TESTS ! 18: ! 19: ! 20: COMPLEX CONVERSION TEST ! 21: ! 22: 1 INSPECT ! 23: COMPUTED= ! 24: 1.0 5.5 ! 25: CORRECT= ! 26: 1.0 5.5 ! 27: 2 INSPECT ! 28: COMPUTED= ! 29: 22.0 66.6 ! 30: CORRECT= ! 31: 22.0 66.6 ! 32: 3 INSPECT ! 33: COMPUTED= ! 34: 33.1234 55.0789 ! 35: CORRECT= ! 36: 33.1234 55.0789 ! 37: 4 INSPECT ! 38: COMPUTED= ! 39: 123.00 456.88 ! 40: CORRECT= ! 41: 123.00 456.88 ! 42: 5 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 43: COMPUTED= ! 44: 0.123E+01 0.987E+01 ! 45: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 46: +0.123E+01 +0.987E+01 ! 47: +0.123+001 +0.987+001 ! 48: 6 INSPECT LEADING ZERO OPTIONAL ! 49: COMPUTED= ! 50: -0.2345E+02 -0.6879E+02 ! 51: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 52: -0.2345E+02 -0.6879E+02 ! 53: -0.2345+002 -0.6879+002 ! 54: 1 ! 55: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 56: ------------------------------------------------------------------------------- ! 57: 7 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 58: COMPUTED= ! 59: 0.7E+03 0.4E+03 ! 60: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 61: +0.7E+03 +0.4E+03 ! 62: +0.7+003 +0.4+003 ! 63: 8 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 64: COMPUTED= ! 65: 0.9876543E-04 0.1357913E-04 ! 66: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 67: +0.9876543E-04 +0.1357913E-04 ! 68: +0.9876543-004 +0.1357913-004 ! 69: 9 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 70: FOR THE SECOND NUMBER ! 71: COMPUTED= ! 72: 19.34 0.2468E+02 ! 73: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 74: 19.34 +0.2468E+02 ! 75: 19.34 +0.2468+002 ! 76: 10 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 77: FOR THE FIRST NUMBER ! 78: COMPUTED= ! 79: 0.765E+02 87.6 ! 80: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 81: +0.765E+02 87.6 ! 82: +0.765+002 87.6 ! 83: 11 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 84: COMPUTED: 3 COMPUTED LINES EXPECTED ! 85: 43.96 0.5407E+02 ! 86: 43.96 0.5407E+02 ! 87: 43.96 0.5407E+02 ! 88: ! 89: CORRECT: EACH RESULT LINE SHOULD MATCH ! 90: EITHER ONE OF THE 2 POSSIBLE ! 91: ANSWERS BELOW ! 92: +43.96+0.5407E+02 ! 93: +43.96+0.5407+002 ! 94: 1 ! 95: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 96: ------------------------------------------------------------------------------- ! 97: ! 98: D CONVERSION TEST ! 99: ! 100: 12 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 101: COMPUTED= ! 102: 0.1D+06 ! 103: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 104: +0.1D+06 ! 105: +0.1E+06 ! 106: +0.1+006 ! 107: 13 INSPECT LEADING ZERO OPTIONAL ! 108: COMPUTED: 2 COMPUTED LINES EXPECTED ! 109: -0.334D-04 ! 110: -0.334D-04 ! 111: CORRECT: EACH RESULT LINE SHOULD MATCH ! 112: ONE OF THE 3 POSSIBLE ANSWERS ! 113: BELOW ! 114: -0.334D-04 ! 115: -0.334E-04 ! 116: -0.334-004 ! 117: 14 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 118: COMPUTED= ! 119: 0.7657654D+00 ! 120: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 121: +0.7657654D+00 ! 122: +0.7657654E+00 ! 123: +0.7657654+000 ! 124: 15 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 125: COMPUTED= ! 126: 0.12345678901D+10 ! 127: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 128: +0.12345678901D+10 ! 129: +0.12345678901E+10 ! 130: +0.12345678901+010 ! 131: 16 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 132: COMPUTED: 3 COMPUTED LINES EXPECTED ! 133: 0.98765432109876D-01 ! 134: 0.98765432109876D-01 ! 135: 0.98765432109876D-01 ! 136: CORRECT: EACH RESULT LINE SHOULD MATCH ! 137: ONE OF THE 3 POSSIBLE ANSWERS ! 138: BELOW ! 139: +0.98765432109876D-01 ! 140: +0.98765432109876E-01 ! 141: +0.98765432109876-001 ! 142: 17 INSPECT LEADING ZERO OPTIONAL ! 143: COMPUTED: 2 COMPUTED LINES EXPECTED ! 144: -0.555555542D+03 ! 145: -0.555555542D+03 ! 146: CORRECT: EACH RESULT LINE SHOULD MATCH ! 147: ONE OF THE 3 POSSIBLE ANSWERS ! 148: BELOW ! 149: -0.555555542D+03 ! 150: -0.555555542E+03 ! 151: -0.555555542+003 ! 152: 1 ! 153: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 154: ------------------------------------------------------------------------------- ! 155: ! 156: TEST UNSUBSCRIPTED ARRAY NAMES IN I/O LISTS ! 157: ! 158: 18 INSPECT ! 159: COMPUTED: 2 COMPUTED LINES EXPECTED ! 160: 9.91.19.92.29.93.39.94.4 ! 161: 9.91.19.92.29.93.39.94.4 ! 162: CORRECT: EACH RESULT LINE SHOULD EQUAL ! 163: 9.91.19.92.29.93.39.94.4 ! 164: 19 INSPECT LEADING ZERO OPTIONAL ! 165: COMPUTED: 2 COMPUTED LINES EXPECTED ! 166: -0.99D+01-0.98D+01-0.97D+01-0.96D+01 ! 167: -0.99D+01-0.98D+01-0.97D+01-0.96D+01 ! 168: CORRECT: EACH RESULT LINE SHOULD MATCH ! 169: ONE OF THE 3 POSSIBLE ANSWERS ! 170: BELOW ! 171: -0.99D+01-0.98D+01-0.97D+01-0.96D+01 ! 172: -0.99E+01-0.98E+01-0.97E+01-0.96E+01 ! 173: -0.99+001-0.98+001-0.97+001-0.96+001 ! 174: 20 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 175: COMPUTED= ! 176: 0.99D+01 0.98D+01 0.97D+01 0.96D+01 ! 177: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 178: +0.99D+01+0.98D+01+0.97D+01+0.96D+01 ! 179: +0.99E+01+0.98E+01+0.97E+01+0.96E+01 ! 180: +0.99+001+0.98+001+0.97+001+0.96+001 ! 181: 21 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 182: COMPUTED: 5 COMPUTED LINES EXPECTED ! 183: 0.99D+01 ! 184: 0.99D+01 ! 185: 0.99D+01 ! 186: 0.99D+01 ! 187: 0.99D+01 ! 188: ! 189: CORRECT: EACH RESULT LINE SHOULD MATCH ! 190: ONE OF THE 3 POSSIBLE ANSWERS ! 191: BELOW ! 192: +0.99D+01 ! 193: +0.99E+01 ! 194: +0.99+001 ! 195: 22 INSPECT ! 196: COMPUTED: 3 COMPUTED LINES EXPECTED ! 197: 9.95.59.96.69.97.79.98.8 ! 198: 9.95.59.96.69.97.79.98.8 ! 199: 9.95.59.96.69.97.79.98.8 ! 200: CORRECT: EACH RESULT LINE SHOULD EQUAL ! 201: 9.95.59.96.69.97.79.98.8 ! 202: 1 ! 203: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 204: ------------------------------------------------------------------------------- ! 205: ! 206: LEADING BLANK INSERTION TEST ! 207: ! 208: 23 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 209: LEADING BLANKS ARE REQUIRED ! 210: COMPUTED= ! 211: 0.1D+00 ! 212: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 213: +0.1D+00 ! 214: +0.1E+00 ! 215: +0.1+000 ! 216: 24 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 217: LEADING BLANKS ARE REQUIRED ! 218: COMPUTED= ! 219: 0.1D+00 ! 220: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 221: +0.1D+00 ! 222: +0.1E+00 ! 223: +0.1+000 ! 224: 25 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 225: LEADING BLANKS ARE REQUIRED ! 226: COMPUTED= ! 227: 0.1D+00 ! 228: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 229: +0.1D+00 ! 230: +0.1E+00 ! 231: +0.1+000 ! 232: 26 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 233: LEADING BLANKS ARE REQUIRED ! 234: COMPUTED= ! 235: 0.1D+00 ! 236: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 237: +0.1D+00 ! 238: +0.1E+00 ! 239: +0.1+000 ! 240: 27 INSPECT LEADING PLUS OPTIONAL ! 241: LEADING BLANKS ARE REQUIRED ! 242: COMPUTED= ! 243: 1.0 5.5 ! 244: CORRECT= ! 245: +1.0 +5.5 ! 246: 28 INSPECT LEADING PLUS OPTIONAL ! 247: LEADING BLANKS ARE REQUIRED ! 248: COMPUTED= ! 249: 9.9 5.5 ! 250: CORRECT= ! 251: +9.9 +5.5 ! 252: 1 ! 253: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 254: ------------------------------------------------------------------------------- ! 255: 29 INSPECT LEADING PLUS OPTIONAL ! 256: LEADING BLANKS ARE REQUIRED ! 257: COMPUTED= ! 258: 9.9 5.5 ! 259: CORRECT= ! 260: +9.9 +5.5 ! 261: 30 INSPECT LEADING PLUS OPTIONAL ! 262: LEADING BLANKS ARE REQUIRED ! 263: COMPUTED= ! 264: 1.0 5.5 ! 265: CORRECT= ! 266: +1.0 +5.5 ! 267: ! 268: G CONVERSION TEST ! 269: ! 270: 31 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 271: COMPUTED: 2 COMPUTED LINES EXPECTED ! 272: 0.1235E+05 1235. 123.5 ! 273: 12.35 1.235 0.1235 ! 274: ! 275: CORRECT: CORRESPONDING LINES MUST MATCH ! 276: EITHER OF THE FOLLOWING TWO ! 277: CORRECT ANSWERS ! 278: ! 279: +0.1235E+05 +1235. +123.5 ! 280: +12.35 +1.235 +0.1235 ! 281: ! 282: +0.1235+005 +1235. +123.5 ! 283: +12.35 +1.235 +0.1235 ! 284: ! 285: SCALE FACTOR ON READ ! 286: ! 287: 32 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 288: COMPUTED= ! 289: 98.7654 0.9877E+04 987654.00 987.654 ! 290: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 291: +98.7654 +0.9877E+04 +987654.00 +987.654 ! 292: +98.7654 +0.9877+004 +987654.00 +987.654 ! 293: 33 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 294: COMPUTED= ! 295: 0.8648D-02 0.8648E+04 8647.860 ! 296: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 297: +0.8648D-02 +0.8648E+04 +8647.860 ! 298: +0.8648E-02 +0.8648E+04 +8647.860 ! 299: +0.8648-002 +0.8648+004 +8647.860 ! 300: OR ! 301: +0.8648D-02 +0.8648E+04 +8647.859 ! 302: +0.8648E-02 +0.8648E+04 +8647.859 ! 303: +0.8648-002 +0.8648+004 +8647.859 ! 304: 34 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 305: COMPUTED= ! 306: 0.8658D+04 98.77 ! 307: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 308: +0.8658D+04 +98.77 ! 309: +0.8658E+04 +98.77 ! 310: +0.8658+004 +98.77 ! 311: 1 ! 312: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 313: ------------------------------------------------------------------------------- ! 314: ! 315: SCALE FACTOR ON WRITE ! 316: ! 317: 35 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 318: COMPUTED= ! 319: 987.66 0.0099E+06 98.7654 9.88E+02 8.6479D+02 ! 320: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 321: +987.66 +0.0099E+06 +98.7654 +9.88E+02 +8.6479D+02 ! 322: +987.66 +0.0099E+06 +98.7654 +9.88E+02 +8.6479E+02 ! 323: +987.66 +0.0099+006 +98.7654 +9.88+002 +8.6479+002 ! 324: OR ! 325: +987.66 +0.0099E+06 +98.76539 +9.88E+02 +8.6479D+02 ! 326: +987.66 +0.0099E+06 +98.76539 +9.88E+02 +8.6479E+02 ! 327: +987.66 +0.0099+006 +98.76539 +9.88+002 +8.6479+002 ! 328: 36 INSPECT LEADING PLUS SIGN/ZERO OPTIONAL ! 329: COMPUTED= ! 330: 0.0086E+06 8647.86 8.6579D+03 9877. ! 331: CORRECT: 3 CORRECT ANSWERS POSSIBLE ! 332: +0.0086E+06 +8647.86 +8.6579D+03 +9877. ! 333: +0.0086E+06 +8647.86 +8.6579E+03 +9877. ! 334: +0.0086+006 +8647.86 +8.6579+003 +9877. ! 335: ! 336: ------------------------------------------------------------------------------- ! 337: ! 338: 0 TESTS PASSED ! 339: 0 TESTS FAILED ! 340: 0 TESTS DELETED ! 341: 36 TESTS REQUIRE INSPECTION ! 342: 36 OF 36 TESTS EXECUTED ! 343: ! 344: *FM900END* END OF TEST - FM900 ! 345: ! 346: TC-85- -410 * /850703 ! 347: FOR OFFICIAL USE ONLY COPYRIGHT 1982
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.