Changeset 3894

Timestamp:

Jan 25, 2016, 10:42:20 AM (9 years ago)

Author:

ymipsl

Message:

Temporary disabled printing min and max value for orography parametrization, causing floating point exception.

YM

File:

• dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/phyetat0.F90 (modified) (1 diff)

dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/phyetat0.F90

@@ -635 +635 @@
 
   CALL get_field("ZSTD", zstd)
-  PRINT*, 'OROGRAPHIE SOUS-MAILLE zstd:',minval(zstd(:)),maxval(zstd(:))
+!  PRINT*, 'OROGRAPHIE SOUS-MAILLE zstd:',minval(zstd(:)),maxval(zstd(:))
 
   CALL get_field("ZSIG", zsig)
-  PRINT*, 'OROGRAPHIE SOUS-MAILLE zsig:',minval(zsig(:)),maxval(zsig(:))
+!  PRINT*, 'OROGRAPHIE SOUS-MAILLE zsig:',minval(zsig(:)),maxval(zsig(:))
 
   CALL get_field("ZGAM", zgam)
-  PRINT*, 'OROGRAPHIE SOUS-MAILLE zgam:',minval(zgam(:)),maxval(zgam(:))
+!  PRINT*, 'OROGRAPHIE SOUS-MAILLE zgam:',minval(zgam(:)),maxval(zgam(:))
 
   CALL get_field("ZTHE", zthe)
-  PRINT*, 'OROGRAPHIE SOUS-MAILLE zthe:',minval(zthe(:)),maxval(zthe(:))
+!  PRINT*, 'OROGRAPHIE SOUS-MAILLE zthe:',minval(zthe(:)),maxval(zthe(:))
 
   CALL get_field("ZPIC", zpic)
-  PRINT*, 'OROGRAPHIE SOUS-MAILLE zpic:',minval(zpic(:)),maxval(zpic(:))
+!  PRINT*, 'OROGRAPHIE SOUS-MAILLE zpic:',minval(zpic(:)),maxval(zpic(:))
 
   CALL get_field("ZVAL", zval)
-  PRINT*, 'OROGRAPHIE SOUS-MAILLE zval:',minval(zval(:)),maxval(zval(:))
+!  PRINT*, 'OROGRAPHIE SOUS-MAILLE zval:',minval(zval(:)),maxval(zval(:))
 
   CALL get_field("RUGSREL", rugoro)