Changeset 10697 for NEMO/branches/2019/fix_ticket2238_solution1/src/OCE/ICB/icbini.F90

Timestamp:

2019-02-19T14:07:55+01:00 (5 years ago)

Author:

mathiot

Message:

add if define si3 in icbini (ticket #2238)

File:

• NEMO/branches/2019/fix_ticket2238_solution1/src/OCE/ICB/icbini.F90 (modified) (1 diff)

NEMO/branches/2019/fix_ticket2238_solution1/src/OCE/ICB/icbini.F90

@@ -80 +80 @@
       ff_e(:,:) = 0._wp   ;   tt_e(:,:) = 0._wp   ;
       fr_e(:,:) = 0._wp   ;   hi_e(:,:) = 0._wp   ;
+#if defined key_si3
       ui_e(:,:) = 0._wp   ;   vi_e(:,:) = 0._wp   ;
+#endif
       ssh_e(:,:) = 0._wp  ; 
       !