Ignore:
Timestamp:
Jul 17, 2018, 9:13:03 PM (6 years ago)
Author:
idelkadi
Message:

Implementation de COSPv2 dans LMDZ (correction dans le cas ou les sorties sont geres par IOIPSL).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/libf/phylmd/cosp2/phys_cosp2.F90

    r3371 r3373  
    245245
    246246! Clefs Outputs initialisation
     247#ifdef CPP_XIOS
    247248  call cosp_outputkeys_init(cfg)
    248 !!!   call cosp_outputkeys_test(cfg)
     249#else
     250   call read_cosp_output_nl(itap,cosp_output_nl,cfg)
     251#endif
     252
    249253  print*,' Cles des differents simulateurs cosp a itap :',itap
    250254  print*,'Lradar_sim,Llidar_sim,Lisccp_sim,Lmisr_sim,Lmodis_sim,Lrttov_sim,Lstats', &
     
    263267#ifdef CPP_XIOS
    264268    call read_xiosfieldactive(cfg)
    265 #else
    266     call read_cosp_output_nl(itap,cosp_output_nl,cfg)
    267269#endif
    268270    first_write=.false.
Note: See TracChangeset for help on using the changeset viewer.