Changeset 10250

Timestamp:

2018-10-29T14:19:44+01:00 (6 years ago)

Author:

mathiot

Message:

fix compilation error in PISCES

File:

• NEMO/trunk/src/TOP/PISCES/SED/sedmbc.F90 (modified) (1 diff)

NEMO/trunk/src/TOP/PISCES/SED/sedmbc.F90

@@ -244 +244 @@
          &            zdelta_co2 / ( zsolcp_inv_i(jspoc) + zsolcp_inv_i(jspos) + zsolcp_inv_i(jspor) &
          &          + zsolcp_inv_i(jscal) + zpwcp_inv_i(jwdic) ),     &
-         &            zdelta_fe / ( zpwcp_inv_i(jwfe2)  + zsolcp_inv_i(jsfeo) + + zsolcp_inv_i(jsfes) ) ,  &
+         &            zdelta_fe / ( zpwcp_inv_i(jwfe2) + zsolcp_inv_i(jsfeo) + zsolcp_inv_i(jsfes) ) ,  &
          &            zdelta_no3 / ( zpwcp_inv_i(jwso4) + zpwcp_inv_i(jwh2s) + zsolcp_inv_i(jsfes) )
          WRITE(numsed,*)'=========================================================================='