Lines Matching full:10000
226 WRITE( *, FMT = 10000 )
421 10000 FORMAT( ' COLUMN-MAJOR DATA LAYOUT IS TESTED' )
767 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
796 10000 FORMAT( ' ', A12,' PASSED THE COLUMN-MAJOR COMPUTATIONAL TESTS',
1123 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
1155 10000 FORMAT( ' ', A12,' PASSED THE COLUMN-MAJOR COMPUTATIONAL TESTS',
1511 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
1543 10000 FORMAT( ' ', A12,' PASSED THE COLUMN-MAJOR COMPUTATIONAL TESTS',
1792 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
1818 10000 FORMAT( ' ', A12,' PASSED THE COLUMN-MAJOR COMPUTATIONAL TESTS',
2082 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
2112 10000 FORMAT( ' ', A12,' PASSED THE COLUMN-MAJOR COMPUTATIONAL TESTS',
2413 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
2444 10000 FORMAT( ' ', A12,' PASSED THE COLUMN-MAJOR COMPUTATIONAL TESTS',
