|
|
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: *FM903BEGIN* TEST RESULTS - FM903 ! 7: ! 8: TEST DATE*TIME= 07-Nov-85 - COMPILER= CCI 5.2 ! 9: ! 10: IOFMTF - (354) ADDITIONAL FORMATTED ! 11: ! 12: DATA TRANSFERS ! 13: ! 14: ANS REF. - 12.9.5.2 13.1 13.5 ! 15: ! 16: ! 17: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 18: ------------------------------------------------------------------------------- ! 19: THIS PROGRAM HAS 13 TESTS ! 20: ! 21: ! 22: CHARACTER EXPRESSION AS FORMAT ! 23: ! 24: 1 INSPECT LEADING PLUS SIGN OPTIONAL ! 25: ! 26: COMPUTED: ! 27: 1 22 333 4444 5555 6666 ! 28: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 29: 1 22 333 4444 5555 6666 ! 30: 1 22 333 4444 +5555 +6666 ! 31: 2 INSPECT LEADING PLUS SIGN OPTIONAL ! 32: COMPUTED= ! 33: 6666 5555 4444 333 22 1 ! 34: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 35: 6666 5555 4444 333 22 1 ! 36: +6666 +5555 4444 333 22 1 ! 37: 3 INSPECT LEADING PLUS SIGN OPTIONAL ! 38: COMPUTED= ! 39: 1 45 345 7890 12345 1 56 567 ! 40: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 41: 1 45 345 7890 12345 1 56 567 ! 42: +1 +45 +345 +7890 12345 +1 +56 +567 ! 43: ! 44: INTEGER EDITING AND OUT OF RANGE ! 45: ! 46: 4 INSPECT LEADING PLUS SIGN OPTIONAL ! 47: COMPUTED= ! 48: 12345 12345 12345 12345 ! 49: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 50: 12345 12345 12345 12345 ! 51: +12345 +12345 +12345 +12345 ! 52: 5 INSPECT ! 53: COMPUTED= ! 54: ***** 00012 012 12 12 ( ) ( ) ( ) ! 55: CORRECT= ! 56: ***** 00012 012 12 12 ( ) ( ) ( ) ! 57: 1 ! 58: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 59: ------------------------------------------------------------------------------- ! 60: ! 61: DOUBLE PRECISION EDITING AND OUT OF RANGE ! 62: ! 63: 6 INSPECT 2 COMPUTED LINES EXPECTED ! 64: COMPUTED= ! 65: ****** ***** 12.345 1.2345 ! 66: ****** .12350E+03 .12345E+02 ********* ! 67: ! 68: CORRECT: CORRESPONDING LINES MUST MATCH ! 69: EITHER OF THE FOLLOWING TWO ! 70: CORRECT ANSWERS ! 71: ****** ***** 12.345 1.2345 ! 72: ****** .12350E+03 .12345E+02 ********* ! 73: ! 74: ****** ***** 12.345 1.2345 ! 75: ****** .12350+003 .12345+002 ********* ! 76: ! 77: COMPLEX EDITING AND OUT OF RANGE ! 78: ! 79: 7 INSPECT 2 COMPUTED LINES EXPECTED ! 80: COMPUTED= ! 81: 25.25 75.75 25.25 **** ! 82: .25E+010 .75E+10 ****** ****** ! 83: ! 84: CORRECT: CORRESPONDING LINES MUST MATCH ! 85: EITHER OF THE FOLLOWING TWO ! 86: CORRECT ANSWERS ! 87: 25.25 75.75 25.25 **** ! 88: .25E+010 .75E+10 ****** ****** ! 89: ! 90: +25.25 +75.75 25.25 **** ! 91: .25E+010 .75E+10 ****** ****** ! 92: ! 93: BZ, BN, T, TL AND TR EDIT DESCRIPTOR ! 94: ! 95: 8 INSPECT LEADING PLUS SIGN OPTIONAL ! 96: COMPUTED= ! 97: 12.34506.78 120.34 506.78 123.40 567.80 ! 98: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 99: 12.34506.78 120.34 506.78 123.40 567.80 ! 100: ! 101: +12.34506.78 120.34 506.78 123.40 567.80 ! 102: ! 103: SUBROUTINE CALL ! 104: ! 105: 9 INSPECT LEADING PLUS SIGN OPTIONAL ! 106: COMPUTED: ! 107: 1111 3333-5555 ! 108: CORRECT: 2 CORRECT ANSWERS POSSIBLE ! 109: 1111 3333-5555 ! 110: +1111+3333-5555 ! 111: 1 ! 112: TEST PASS/FAIL DISPLAYED RESULTS REMARKS ! 113: ------------------------------------------------------------------------------- ! 114: ! 115: SS AND SP EDIT DESCRIPTOR ! 116: ! 117: 10 INSPECT LEADING PLUS SIGN OPTIONAL ! 118: COMPUTED= ! 119: +3.0 4.0 +12345 +25.25 5.5 ! 120: 12345 25.25 5.5 ! 121: ! 122: CORRECT: CORRESPONDING LINES MUST MATCH ! 123: +3.0 4.0 +12345 +25.25 5.5 ! 124: 12345 25.25 5.5 ! 125: 11 INSPECT LEADING PLUS SIGN OPTIONAL ! 126: COMPUTED= ! 127: 3.0 +4.0 12345 25.25 +5.5 ! 128: +12345 +25.25 +5.5 ! 129: ! 130: CORRECT: CORRESPONDING LINES MUST MATCH ! 131: 3.0 +4.0 12345 25.25 +5.5 ! 132: +12345 +25.25 +5.5 ! 133: ! 134: COLON EDIT DESCRIPTOR ! 135: ! 136: 12 INSPECT 2 COMPUTED LINES EXPECTED ! 137: COMPUTED= ! 138: AAAABBBBCCCCDDDDEEEEFFFFGGGGHHHHIIIIJJJJ ! 139: AAAABBBBCCCCDDDDEEEEFFFFGGGGHHHH ! 140: ! 141: CORRECT: CORRESPONDING LINES MUST MATCH ! 142: AAAABBBBCCCCDDDDEEEEFFFFGGGGHHHHIIIIJJJJ ! 143: AAAABBBBCCCCDDDDEEEEFFFFGGGGHHHH ! 144: ! 145: 13 INSPECT TEST SUCCESSFUL IF PROCESSOR IS ! 146: ABLE TO READ INPUT CARDS 10-14 ! 147: UNDER F, E, AND G FORMATS WHICH ! 148: HAVE MORE DIGITS THAN THE ! 149: PROCESSOR CAN HANDLE FOR D. P. ! 150: AND COMPLEX ! 151: ! 152: ------------------------------------------------------------------------------- ! 153: ! 154: 0 TESTS PASSED ! 155: 0 TESTS FAILED ! 156: 0 TESTS DELETED ! 157: 13 TESTS REQUIRE INSPECTION ! 158: 13 OF 13 TESTS EXECUTED ! 159: ! 160: *FM903END* END OF TEST - FM903 ! 161: ! 162: TC-85- -410 * /850703 ! 163: 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.