Ignore:
Timestamp:
Apr 3, 2016, 12:09:34 AM (9 years ago)
Author:
Laurent Fairhead
Message:

Merged trunk changes r2457:2487 into testing branch

Location:
LMDZ5/branches/testing
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/branches/testing

  • LMDZ5/branches/testing/libf/phylmd/time_phylmdz_mod.F90

    r2435 r2488  
    2828    INTEGER,SAVE :: itaufin_phy      ! final iteration (in itau_phy steps)
    2929!$OMP THREADPRIVATE(itaufin_phy)
    30     REAL,SAVE    :: current_time ! current elapsed time (s) from the begining of the run
     30    REAL,SAVE    :: current_time ! current elapsed time (fraction of day) from the begining of the run
    3131!$OMP THREADPRIVATE(current_time)
    3232   
     
    6161    CALL getin_p('raz_date', raz_date)
    6262
    63     current_time=0
     63    current_time=0.
    6464   
    6565    CALL phys_cal_init(annee_ref,day_ref)
Note: See TracChangeset for help on using the changeset viewer.