Changeset 2479 for LMDZ5/trunk/libf/phylmd

Timestamp:

Mar 29, 2016, 10:12:18 AM (9 years ago)

Author:

idelkadi

Message:

Correction d'erreur sur la sortie du champs clcalipsoun

File:

• LMDZ5/trunk/libf/phylmd/cosp/cosp_output_write_mod.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/cosp/cosp_output_write_mod.F90

@@ -166 +166 @@
    CALL histwrite2d_cosp(o_clmcalipsoun,stlidar%cldlayerphase(:,2,3))
    CALL histwrite2d_cosp(o_cltcalipsoun,stlidar%cldlayerphase(:,4,3))
-   CALL histwrite3d_cosp(o_clcalipsoice,stlidar%lidarcldphase(:,:,3),nvert)
+   CALL histwrite3d_cosp(o_clcalipsoun,stlidar%lidarcldphase(:,:,3),nvert)
    CALL histwrite3d_cosp(o_clcalipsotmpun,stlidar%lidarcldtmp(:,:,4),nverttemp)