Changeset 70

Timestamp:

08/02/12 20:41:48 (12 years ago)

Author:

dubos

Message:

Bugfix in caldyn_adv

File:

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

codes/icosagcm/trunk/src/caldyn_adv.f90

@@ -17 +17 @@
   IMPLICIT NONE
     REAL(rstd),INTENT(IN) :: dt
-    INTEGER :: write_period
+    REAL(rstd) :: write_period
     CALL allocate_caldyn