Changeset 2943
- Timestamp:
- Jul 12, 2017, 1:49:22 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/cosp/cosp_modis_simulator.F90
r2713 r2943 388 388 allocate(x%Optical_Thickness_vs_ReffLIQ(nPoints, numModisTauBins+1, numModisReffLiqBins)) 389 389 x%Optical_Thickness_vs_Cloud_Top_Pressure(:, :, :) = R_UNDEF 390 x%Optical_Thickness_vs_ReffLIQ(:, :, :) = R_UNDEF 391 x%Optical_Thickness_vs_ReffICE(:, :, :) = R_UNDEF 392 390 393 END SUBROUTINE CONSTRUCT_COSP_MODIS 391 394
Note: See TracChangeset
for help on using the changeset viewer.