Changeset 4949 for branches/2014

Timestamp:

2014-12-02T11:35:48+01:00 (9 years ago)

Author:

cetlod

Message:

2014/dev_MERGE_2014: bugfix on diaar5

File:

• branches/2014/dev_MERGE_2014/NEMOGCM/NEMO/OPA_SRC/DIA/diaar5.F90 (modified) (1 diff)

branches/2014/dev_MERGE_2014/NEMOGCM/NEMO/OPA_SRC/DIA/diaar5.F90

@@ -159 +159 @@
          DO ji=1,jpi
             DO jj=1,jpj
-               ztemp = ztemp + SUM( zarea_ssh(ji,jj) * tsn(ji,jj,mikt(ji,jj),jp_tem) )
-               zsal  = zsal  + SUM( zarea_ssh(ji,jj) * tsn(ji,jj,mikt(ji,jj),jp_sal) )
+               ztemp = ztemp + zarea_ssh(ji,jj) * tsn(ji,jj,mikt(ji,jj),jp_tem) 
+               zsal  = zsal  + zarea_ssh(ji,jj) * tsn(ji,jj,mikt(ji,jj),jp_sal) 
             END DO
          END DO