- Timestamp:
- 2012-01-17T15:53:37+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/LIM_SRC_2/limwri_dimg_2.h90
r3200 r3265 45 45 IF( lk_mpp ) CALL mpp_sum ( ialloc ) 46 46 IF( ialloc /= 0 ) CALL ctl_warn('lim_wri_2 (limwri_dimg_2.h90) : failed to allocate arrays') 47 rcmoy(:,:,:) = 0._wp 47 48 ENDIF 48 49
Note: See TracChangeset
for help on using the changeset viewer.