Changeset 60


Ignore:
Timestamp:
05/11/16 15:24:04 (8 years ago)
Author:
dumas
Message:

Allow possibility to have negative time in netcdf output

Location:
trunk/SOURCES
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/SOURCES/Fichiers-parametres/hemin40_TEMPS-NETCDF.dat

    r9 r60  
    1515------------------------------------------------------------------------------------------- 
    16164       ndtsortie      lecture de dtsortie_hz 
    17 10000. 
     171000. 
    181850000. 
    1919100000. 

  • trunk/SOURCES/Netcdf-routines/sortie_netcdf_GRISLI_mod.0.2-hassine.f90

    r29 r60  
    667667    ! ferret conventions 
    668668 
    669     if ( time .le. 0. ) then 
    670        timetmp = -time 
    671        nametmp = 'p_' 
    672     else 
     669!    if ( time .le. 0. ) then 
     670!       timetmp = -time 
     671!       nametmp = 'p_' 
     672!    else 
    673673       timetmp = time 
    674674       nametmp = 'f_' 
    675     endif 
     675!    endif 
    676676     
    677677    if (.not.associated(tab)) allocate(tab(nx,ny)) 
Note: See TracChangeset for help on using the changeset viewer.