fm900.exp

来自「开放源码的编译器open watcom 1.6.0版的源代码」· EXP 代码 · 共 348 行 · 第 1/2 页

EXP
348
字号
1
                     NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY
                    FORTRAN COMPILER VALIDATION SYSTEM
                      VERSION 2.1  93/10/21*21.02.00
 
 *FM900BEGIN*            TEST RESULTS - FM900

         TEST DATE*TIME= *NO DATE*TIME      -  COMPILER= *NONE SPECIFIED*    
 
 FMTRWF - (021) FORMATTED I/O

  REFS - 12.9.5  13.3  13.5
 
 
  TEST   PASS/FAIL       DISPLAYED RESULTS       REMARKS
 -------------------------------------------------------------------------------
                                                 THIS PROGRAM HAS  36 TESTS


        COMPLEX CONVERSION TEST

     1    INSPECT
                 COMPUTED= 
                          1.0  5.5
                 CORRECT=  
                          1.0  5.5
     2    INSPECT
                 COMPUTED= 
                          22.0  66.6
                 CORRECT=  
                          22.0  66.6
     3    INSPECT
                 COMPUTED= 
                          33.1234  55.0789
                 CORRECT=  
                          33.1234  55.0789
     4    INSPECT
                 COMPUTED= 
                          123.00  456.88
                 CORRECT=  
                          123.00  456.88
     5    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED= 
                           0.123E+01   0.987E+01
                 CORRECT:                        2 CORRECT ANSWERS POSSIBLE
                          +0.123E+01  +0.987E+01
                          +0.123+001  +0.987+001
     6    INSPECT                                LEADING ZERO OPTIONAL          
                 COMPUTED= 
                          -0.2345E+02  -0.6879E+02
                 CORRECT:                        2 CORRECT ANSWERS POSSIBLE
                          -0.2345E+02  -0.6879E+02
                          -0.2345+002  -0.6879+002
1
  TEST   PASS/FAIL       DISPLAYED RESULTS       REMARKS
 -------------------------------------------------------------------------------
     7    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED= 
                           0.7E+03   0.4E+03
                 CORRECT:                        2 CORRECT ANSWERS POSSIBLE
                          +0.7E+03  +0.4E+03
                          +0.7+003  +0.4+003
     8    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED= 
                           0.9876543E-04   0.1357913E-04
                 CORRECT:                        2 CORRECT ANSWERS POSSIBLE
                          +0.9876543E-04  +0.1357913E-04
                          +0.9876543-004  +0.1357913-004
     9    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                                                 FOR THE SECOND NUMBER
                 COMPUTED= 
                          19.34   0.2468E+02
                 CORRECT:                        2 CORRECT ANSWERS POSSIBLE
                          19.34  +0.2468E+02
                          19.34  +0.2468+002
    10    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                                                 FOR THE FIRST NUMBER
                 COMPUTED= 
                           0.765E+02  87.6
                 CORRECT:                        2 CORRECT ANSWERS POSSIBLE
                          +0.765E+02  87.6
                          +0.765+002  87.6
    11    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED:                       3 COMPUTED LINES EXPECTED
                            43.96 0.5407E+02
                            43.96 0.5407E+02
                            43.96 0.5407E+02

                 CORRECT:                        EACH RESULT LINE SHOULD MATCH 
                                                 EITHER ONE OF THE 2 POSSIBLE  
                                                 ANSWERS BELOW
                           +43.96+0.5407E+02
                           +43.96+0.5407+002
1
  TEST   PASS/FAIL       DISPLAYED RESULTS       REMARKS
 -------------------------------------------------------------------------------

        D CONVERSION TEST

    12    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED= 
                           0.1D+06
                 CORRECT:                        3 CORRECT ANSWERS POSSIBLE
                          +0.1D+06
                          +0.1E+06
                          +0.1+006
    13    INSPECT                                LEADING ZERO OPTIONAL          
                 COMPUTED:                       2 COMPUTED LINES EXPECTED
                          -0.334D-04
                          -0.334D-04
                 CORRECT:                        EACH RESULT LINE SHOULD MATCH 
                                                 ONE OF THE 3 POSSIBLE ANSWERS 
                                                 BELOW
                          -0.334D-04
                          -0.334E-04
                          -0.334-004
    14    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED= 
                           0.7657654D+00
                 CORRECT:                        3 CORRECT ANSWERS POSSIBLE
                          +0.7657654D+00
                          +0.7657654E+00
                          +0.7657654+000
    15    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED= 
                           0.12345678901D+10
                 CORRECT:                        3 CORRECT ANSWERS POSSIBLE
                          +0.12345678901D+10
                          +0.12345678901E+10
                          +0.12345678901+010
    16    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL
                 COMPUTED:                       3 COMPUTED LINES EXPECTED
                           0.98765432109876D-01
                           0.98765432109876D-01
                           0.98765432109876D-01
                 CORRECT:                        EACH RESULT LINE SHOULD MATCH 
                                                 ONE OF THE 3 POSSIBLE ANSWERS 
                                                 BELOW
                          +0.98765432109876D-01
                          +0.98765432109876E-01
                          +0.98765432109876-001
    17    INSPECT                                LEADING ZERO OPTIONAL          
                 COMPUTED:                       2 COMPUTED LINES EXPECTED
                          -0.555555542D+03
                          -0.555555542D+03
                 CORRECT:                        EACH RESULT LINE SHOULD MATCH 
                                                 ONE OF THE 3 POSSIBLE ANSWERS 
                                                 BELOW
                          -0.555555542D+03
                          -0.555555542E+03
                          -0.555555542+003
1
  TEST   PASS/FAIL       DISPLAYED RESULTS       REMARKS
 -------------------------------------------------------------------------------

        TEST UNSUBSCRIPTED ARRAY NAMES IN I/O LISTS 

    18    INSPECT
                 COMPUTED:                       2 COMPUTED LINES EXPECTED
                          9.91.19.92.29.93.39.94.4
                          9.91.19.92.29.93.39.94.4
                 CORRECT:                        EACH RESULT LINE SHOULD EQUAL
                          9.91.19.92.29.93.39.94.4
    19    INSPECT                                LEADING ZERO OPTIONAL          
                 COMPUTED:                       2 COMPUTED LINES EXPECTED
                          -0.99D+01-0.98D+01-0.97D+01-0.96D+01
                          -0.99D+01-0.98D+01-0.97D+01-0.96D+01
                 CORRECT:                        EACH RESULT LINE SHOULD MATCH 
                                                 ONE OF THE 3 POSSIBLE ANSWERS 
                                                 BELOW
                          -0.99D+01-0.98D+01-0.97D+01-0.96D+01
                          -0.99E+01-0.98E+01-0.97E+01-0.96E+01
                          -0.99+001-0.98+001-0.97+001-0.96+001
    20    INSPECT                                LEADING PLUS SIGN/ZERO OPTIONAL

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?