Lines Matching full:10001
177 WRITE( *, FMT = 10001 )
391 10001 FORMAT(' ROW-MAJOR DATA LAYOUT IS TESTED' )
682 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
703 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1008 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1029 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1359 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1380 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1732 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1762 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
2185 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
2215 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
