Ignore:
Timestamp:
03/25/19 17:19:44 (5 years ago)
Author:
jisesh
Message:

devel : towards nudging (now : wind only)

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r741 r818  
    153153    CALL init_sponge 
    154154    CALL init_observable 
    155     CALL init_guided 
    156155    CALL init_advect_tracer 
    157156    CALL init_check_conserve 
    158157 
    159158    CALL etat0(f_ps,f_mass,f_phis,f_theta_rhodz,f_u, f_geopot,f_W, f_q) 
     159     
     160    CALL init_guided(f_u) 
    160161 
    161162    CALL transfert_request(f_phis,req_i0)  
Note: See TracChangeset for help on using the changeset viewer.