Changeset 13 for trunk/SOURCES/Greeneem_files/fake-routines-greeneem_mod.f90

Timestamp:

04/15/15 17:33:41 (9 years ago)

Author:

dumas

Message:

Region Greeneem15 validee. Correction de bug sur les sorties NetCDF. output_hemin40_mod-0.4.f90 devient output_hemin40_mod.f90

File:

• trunk/SOURCES/Greeneem_files/fake-routines-greeneem_mod.f90 (modified) (2 diffs)

trunk/SOURCES/Greeneem_files/fake-routines-greeneem_mod.f90

@@ -4 +4 @@
 
 use module3d_phy
-use deformation_mod_2lois 
-
 implicit none
 
@@ -28 +26 @@
 end subroutine track_change_T
 
+!____________________________________________________
+subroutine time_step_recul
+
+if (itracebug.eq.1)  call tracebug(' Entree dans routine fake time_step_recul')
+! quand on n'utilise pas le recul
+end subroutine time_step_recul
+
 end module fake_greeneem
 !