Ignore:
Timestamp:
01/27/17 15:49:46 (7 years ago)
Author:
dubos
Message:

Updated devel to r517

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r499 r528  
    175175    USE output_field_mod 
    176176    USE write_etat0_mod 
     177    USE restart_mod 
    177178    USE checksum_mod 
    178179    USE explicit_scheme_mod 
    … …  
    222223      IF (is_omp_master) CALL xios_update_calendar(1) 
    223224    END IF 
     225     
     226    IF (write_start) CALL write_etat0(itau0,f_ps, f_phis,f_theta_rhodz,f_u,f_q)  ! FIXME : write_start undefined 
     227    
    224228    CALL write_output_fields_basic(.TRUE., f_phis, f_ps, f_mass, f_geopot, f_theta_rhodz, f_u, f_W, f_q) 
    225229 
Note: See TracChangeset for help on using the changeset viewer.