- Timestamp:
- Sep 25, 2015 4:53:10 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/UTIL/find_palm_config.f90
r1310 r1673 19 19 ! 20 20 ! Current revisions: 21 ! ----------------- 21 ! ------------------ 22 ! informative message about definition of tolerance added 22 23 ! 23 24 ! Former revisions: … … 59 60 !-- Ask number of processors available 60 61 PRINT*, '*** number of PEs available + allowed tolerance:' 62 PRINT*, ' (tolerance is defined in %, e.g. 0.1 means 10%)' 61 63 READ (*,*) numprocs, tolerance 62 64 IF ( tolerance < 0.0 ) THEN … … 235 237 PRINT*, '+++ No valid processor grid found for the given number of' 236 238 PRINT*, ' processors and gridpoints' 237 STOP 239 STOP 'bye' 238 240 ENDIF 239 241
Note: See TracChangeset
for help on using the changeset viewer.