Changeset 12475 for NEMO/branches/UKMO/NEMO_4.0_add_pond_lids_prints/src/OCE/IOM/restart.F90

Timestamp:

2020-02-27T12:27:50+01:00 (4 years ago)

Author:

dancopsey

Message:

• Add more print statements.
• Move away from using snow to ice diagnostics and use a new snow to pond one instead.

File:

• NEMO/branches/UKMO/NEMO_4.0_add_pond_lids_prints/src/OCE/IOM/restart.F90 (modified) (2 diffs)

NEMO/branches/UKMO/NEMO_4.0_add_pond_lids_prints/src/OCE/IOM/restart.F90

@@ -281 +281 @@
          neuler = 0
       ENDIF
+
+      write(numout,*)'rst_read 2: ub(3,4,1) = ', ub(3,4,1)
+
       !
       CALL iom_get( numror, jpdom_autoglo, 'un'     , un, ldxios = lrxios )   ! now    fields
@@ -306 +309 @@
          !
       ENDIF
+      write(numout,*)'rst_read 3: ub(3,4,1) = ', ub(3,4,1)
       !
    END SUBROUTINE rst_read