Changeset 182


Ignore:
Timestamp:
02/14/18 14:56:18 (6 years ago)
Author:
dumas
Message:

Bug in isostasy : initialisation of dt_iso in noisostasie module

Location:
trunk/SOURCES
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/SOURCES/noisostasie_mod-0.3.f90

    r4 r182  
    2222!> 
    2323SUBROUTINE INIT_ISO 
     24  use iso_declar, only: dt_iso 
    2425  implicit none 
    2526 
    26 nbed = 0  ! pas d'isostasie 
     27  nbed = 0  ! pas d'isostasie 
     28  dt_iso = 50. ! pas de temps entre 2 appels a l'isostasie 
    2729 
    2830END SUBROUTINE INIT_ISO 

  • trunk/SOURCES/steps_time_loop.f90

    r181 r182  
    2424  use bilan_eau_mod 
    2525  use bilan_flux_mod 
    26   use iso_declar, only: dt_iso 
    2726  !  use track_debug  
    2827 
    … …  
    174173  use diagno_mod 
    175174  use resolmeca_SIA_L1 
     175  use iso_declar, only: dt_iso 
    176176!  use track_debug  
    177177 
Note: See TracChangeset for help on using the changeset viewer.