Changeset 131 for codes/icosagcm/trunk/src/earth_const.f90

Timestamp:

02/08/13 12:09:35 (11 years ago)

Author:

ymipsl

Message:

Some operations must be only done by the mpi master task.

YM

File:

• codes/icosagcm/trunk/src/earth_const.f90 (modified) (1 diff)

codes/icosagcm/trunk/src/earth_const.f90

@@ -30 +30 @@
     radius=radius/scale_factor
     omega=omega*scale_factor
-    PRINT *,"radius = ",radius
     
   END SUBROUTINE init_earth_const