Changeset 2594 for LMDZ5/branches/testing/libf/phylmd/cosp/cosp_output_write_mod.F90

Timestamp:

Jul 18, 2016, 9:41:10 PM (8 years ago)

Author:

Laurent Fairhead

Message:

Merged trunk changes r2545:2589 into testing branch

Location:

LMDZ5/branches/testing

Files:

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

LMDZ5/branches/testing/libf/phylmd/cosp/cosp_output_write_mod.F90

@@ -322 +322 @@
     if(modis%Cloud_Particle_Size_Water_Mean(ip).eq.R_UNDEF)then
        modis%Cloud_Particle_Size_Water_Mean(ip)=Cosp_fill_value
+    endif
+    if(modis%Cloud_Particle_Size_Ice_Mean(ip).eq.R_UNDEF)then
+       modis%Cloud_Particle_Size_Ice_Mean(ip)=Cosp_fill_value
     endif
     if(modis%Cloud_Top_Pressure_Total_Mean(ip).eq.R_UNDEF)then