Changeset 10519 for NEMO/trunk/src/ICE/icestp.F90

Timestamp:

2019-01-15T18:41:40+01:00 (5 years ago)

Author:

clem

Message:

solve a compilation issue with agrif. It looks like agrif does not like 2 subroutines to have the same name eventhough they are not in the same module and they are not declared as public. I would like to say wtf but lets remain polite and say whats going on? Does agrif consider all the subroutines as public?

File:

• NEMO/trunk/src/ICE/icestp.F90 (modified) (1 diff)

NEMO/trunk/src/ICE/icestp.F90

@@ -226 +226 @@
       !!----------------------------------------------------------------------
       IF(lwp) WRITE(numout,*)
-      IF(lwp) WRITE(numout,*) 'ice_init: Arrays allocation & Initialization off all routines & init state' 
+      IF(lwp) WRITE(numout,*) 'Sea Ice Model: SI3 (Sea Ice modelling Integrated Initiative)' 
+      IF(lwp) WRITE(numout,*) '~~~~~~~~~~~~~'
+      IF(lwp) WRITE(numout,*)
+      IF(lwp) WRITE(numout,*) 'ice_init: Arrays allocation & Initialization of all routines & init state' 
       IF(lwp) WRITE(numout,*) '~~~~~~~~'
       !