Changeset 429


Ignore:
Timestamp:
06/14/16 23:36:46 (8 years ago)
Author:
ymipsl
Message:

Field are sent to xios only at each "write_period"

YM

Location:
codes/icosagcm/trunk/src
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/trunk/src/timeloop_gcm.f90

    r415 r429  
    3434    CALL init_caldyn 
    3535     
    36     IF (xios_output) itau_out=1 
     36!    IF (xios_output) itau_out=1 
    3737    IF (.NOT. enable_io) itau_out=HUGE(itau_out) 
    3838 

  • codes/icosagcm/trunk/src/xios_mod.F90

    r394 r429  
    195195 
    196196   dtime%second=dt 
    197    CALL xios_set_timestep(dtime)  
     197   CALL xios_set_timestep(dtime) 
     198    
     199   CALL xios_set_fieldgroup_attr("standard_output", freq_op=itau_out*xios_timestep, freq_offset=(itau_out-1)*xios_timestep) 
     200     
    198201   CALL xios_close_context_definition() 
    199202!$OMP END MASTER 
Note: See TracChangeset for help on using the changeset viewer.