Annotation of cci/usr/src/usr.bin/f77/testf77/tests/FM109.res, revision 1.1

1.1     ! root        1: 1
        !             2:            FORTRAN COMPILER VALIDATION SYSTEM
        !             3:  
        !             4:  
        !             5:                       VERSION 1.0
        !             6:  
        !             7:            FOR OFFICIAL USE ONLY - COPYRIGHT 1978
        !             8:  
        !             9:                    SUBSET LEVEL TEST
        !            10:  
        !            11:  
        !            12:       ----------------------------------------------
        !            13:  
        !            14:           TEST   156
        !            15:      LAST LINE ON THIS PAGE
        !            16: 1     THIS IS FIRST LINE ON PAGE
        !            17:  
        !            18:           TEST   157
        !            19:  
        !            20:  THERE IS ONE BLANK LINE BEFORE THIS LINE
        !            21:            
        !            22:            
        !            23:  THERE ARE TWO BLANK LINES BEFORE THIS LINE
        !            24: 
        !            25: 
        !            26: 
        !            27:  THERE ARE THREE BLANK LINES BEFORE THIS LINE
        !            28:  
        !            29:           TEST   158
        !            30:  NEXT LINE CONTAINS 54 CHARACTERS
        !            31:  123456789012345678901234567890123456789012345678901234
        !            32:  
        !            33:           TEST   159
        !            34:            THIS TEST PRINTS 3 UNDER I1 DESCRIPTOR
        !            35:            3
        !            36:  
        !            37:           TEST   160
        !            38:            THIS TEST PRINTS 15 UNDER I2 DESCRIPTOR
        !            39:            15
        !            40:  
        !            41:           TEST   161
        !            42:            THIS TEST PRINTS 291 UNDER I3 DESCRIPTOR
        !            43:            291
        !            44:  
        !            45:           TEST   162
        !            46:            THIS TEST PRINTS 4321 UNDER I4 DESCRIPTOR
        !            47:            4321
        !            48:  
        !            49:           TEST   163
        !            50:            THIS TEST PRINTS 12345 UNDER I5 DESCRIPTOR
        !            51:            12345
        !            52:  
        !            53:           TEST   164
        !            54:    THIS TEST PRINTS 1, 22, 333, 4444, AND 25555 UNDER
        !            55:           (10X,I1,3X,I2,3X,I3,3X,I4,3X,I5)
        !            56:           1   22   333   4444   25555
        !            57:  
        !            58:           TEST   165
        !            59:           NEXT TWO LINES ARE IDENTICAL
        !            60:       IVON01 =  113   IVON02 =    8
        !            61:       IVON01 =  113   IVON02 =    8
        !            62:  
        !            63:           TEST   166
        !            64:            THIS TEST PRINTS -1 UNDER I2 DESCRIPTOR
        !            65:            -1
        !            66:  
        !            67:           TEST   167
        !            68:            THIS TEST PRINTS -22 UNDER I3 DESCRIPTOR
        !            69:            -22
        !            70:  
        !            71:           TEST   168
        !            72:            THIS TEST PRINTS -333 UNDER I4 DESCRIPTOR
        !            73:            -333
        !            74:  
        !            75:           TEST   169
        !            76:            THIS TEST PRINTS -4444 UNDER I5 DESCRIPTOR
        !            77:            -4444
        !            78:  
        !            79:           TEST   170
        !            80:            THIS TEST PRINTS -15555 UNDER DESCRIPTOR I6
        !            81:            -15555
        !            82:  
        !            83:           TEST   171
        !            84:         THIS TEST PRINTS -9, -88, -777, -6666, AND -25555
        !            85:            UNDER FORMAT 10X,I2,3X,I3,3X,I4,3X,I5,3X,I6
        !            86:           -9   -88   -777   -6666   -25555
        !            87:  
        !            88:           TEST   172
        !            89:                   THIS TEST PRINTS 5, -54, 543, -5432, AND 32000
        !            90:            UNDER I5 NUMERIC FIELD DESCRIPTOR
        !            91:                5     -54     543   -5432   32000
        !            92:  
        !            93:           TEST   173
        !            94:  
        !            95:  THERE IS ONE BLANK LINE BEFORE THIS LINE
        !            96: 0
        !            97:  THERE ARE TWO BLANK LINES BEFORE THIS LINE
        !            98:  
        !            99: 0
        !           100:  THERE ARE THREE BLANK LINES BEFORE THIS LINE
        !           101: 0
        !           102: 0
        !           103:  THERE ARE FOUR  BLANK LINES BEFORE THIS LINE
        !           104:  
        !           105:           TEST   174
        !           106:  
        !           107:            1ST LINE - AABBCCDD
        !           108: +                         WWXXYYZZ OVERPRINTS - 2ND LINE
        !           109: 
        !           110: 
        !           111: 
        !           112: 
        !           113: 
        !           114:  
        !           115:  
        !           116:            11    44     1ST         LINE
        !           117: +            22    55       2ND
        !           118: +              33    66         3RD
        !           119:  
        !           120:           TEST   175
        !           121:            THIS TESTS PRINTS 3. UNDER F3.0 DESCRIPTOR
        !           122:             3.
        !           123:  
        !           124:           TEST   176
        !           125:            THIS TEST  PRINTS -15. WITH F4.0 DESCRIPTOR
        !           126:            -15.
        !           127:  
        !           128:           TEST   177
        !           129:            THIS TEST PRINTS -0.12345E+03 USING E12.5
        !           130:            -0.12345E+03
        !           131:  
        !           132:       ----------------------------------------------
        !           133:  
        !           134:                      END OF PROGRAM FM109

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.