Changeset 3265 for branches

Timestamp:

2012-01-17T15:53:37+01:00 (12 years ago)

Author:

rblod

Message:

Initialization of rcmoy for dimg outputs see ticket #907

File:

• branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/LIM_SRC_2/limwri_dimg_2.h90 (modified) (1 diff)

branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/LIM_SRC_2/limwri_dimg_2.h90

@@ -45 +45 @@
        IF( lk_mpp      )   CALL mpp_sum ( ialloc  )
        IF( ialloc /= 0 )   CALL ctl_warn('lim_wri_2 (limwri_dimg_2.h90) : failed to allocate arrays')
+       rcmoy(:,:,:) = 0._wp
     ENDIF