- Timestamp:
- 01/16/15 15:05:23 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/branches/SATURN_DYNAMICO/ICOSAGCM/src/geometry.f90
r296 r318 192 192 USE vector 193 193 USE getin_mod 194 USE mpipara 194 195 IMPLICIT NONE 195 196 INTEGER :: nb_it=0 … … 274 275 275 276 IF (check) THEN 276 PRINT *,"it = ",it," diff centroid circumcenter ",sum 277 !$OMP MASTER 278 IF (is_mpi_master) PRINT *,"it = ",it," diff centroid circumcenter ",sum 279 !$OMP END MASTER 277 280 ENDIF 278 281
Note: See TracChangeset
for help on using the changeset viewer.