Changeset 303 for codes

Timestamp:

12/11/14 17:27:04 (10 years ago)

Author:

ymipsl

Message:

bug fix for lmdz physics generic termination.

YM

File:

• codes/icosagcm/branches/SATURN_DYNAMICO/ICOSAGCM/src/physics_lmdz_generic.f90 (modified) (1 diff)

codes/icosagcm/branches/SATURN_DYNAMICO/ICOSAGCM/src/physics_lmdz_generic.f90

@@ -231 +231 @@
     ENDIF
 
-    IF(it==itaumax) THEN 
+    IF(it==itau0+itaumax .OR. it+itau_physics > itau0+itaumax) THEN 
       lafin=.TRUE.
     ELSE