Changeset 3192 for LMDZ6/trunk/libf


Ignore:
Timestamp:
Feb 8, 2018, 11:36:03 AM (7 years ago)
Author:
idelkadi
Message:

Correction de diagnostique de sortie Cosp (Parasol).

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/cosp/cosp_output_write_mod.F90

    r3172 r3192  
    219219      CALL histwrite3d_cosp(o_profSR,stlidar%profSR(:,icl,:),nvert,icl)           !TIBO
    220220   enddo                                                                          !TIBO
    221      CALL histwrite3d_cosp(o_parasol_refl,stlidar%parasolrefl,nvertp)
    222 #endif
     221#endif
     222   CALL histwrite3d_cosp(o_parasol_refl,stlidar%parasolrefl,nvertp)
    223223
    224224   do k=1,PARASOL_NREFL
Note: See TracChangeset for help on using the changeset viewer.