Ignore:
Timestamp:
08/05/14 16:00:09 (10 years ago)
Author:
ymipsl
Message:

Synchronize trunk and Saturn branch.
Merge modification from trunk branch to Saturn branch.

YM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/branches/SATURN_DYNAMICO/ICOSAGCM/src/time.f90

    r262 r267  
    6868    CALL getin('run_length',run_length) 
    6969    itaumax=run_length/dt 
    70     IF (is_mpi_root)  THEN 
    71        PRINT *, 'itaumax=',itaumax 
    72        PRINT *, 'itau_adv=',itau_adv, 'itau_dissip=',itau_dissip, 'itau_physics=',itau_physics 
    73     END IF 
    7470    dt=dt/scale_factor 
    7571 
    … …  
    9086    CALL getin('itau_physics',itau_physics) 
    9187 
     88    IF (is_mpi_root)  THEN 
     89       PRINT *, 'itaumax=',itaumax 
     90       PRINT *, 'itau_adv=',itau_adv, 'itau_dissip=',itau_dissip, 'itau_physics=',itau_physics 
     91    END IF 
    9292     
    9393    CALL create_time_counter_header 
Note: See TracChangeset for help on using the changeset viewer.