Lines Matching full:10001
223 WRITE( *, FMT = 10001 )
420 10001 FORMAT( ' ROW-MAJOR DATA LAYOUT IS TESTED' )
768 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
794 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1124 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1153 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1512 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1541 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1793 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1816 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
2083 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
2110 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
2414 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
2442 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
