New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 14842 – NEMO

Changeset 14842


Ignore:
Timestamp:
2021-05-11T15:17:26+02:00 (3 years ago)
Author:
acc
Message:

Add missing initialisation in trcnam_age.F90 and missing type declarations in module_example.F90

Location:
NEMO/trunk/src
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/src/OCE/module_example.F90

    r14834 r14842  
    187187CONTAINS 
    188188   SUBROUTINE exa_mpl( kt, pvar1, pvar2, ptab )              ! Empty routine 
    189       REAL::   ptab(:,:) 
     189      INTEGER :: kt 
     190      REAL::   pvar1, pvar2, ptab(:,:) 
    190191      WRITE(*,*) 'exa_mpl: You should not have seen this print! error?', kt, pvar1, pvar2, ptab(1,1) 
    191192   END SUBROUTINE exa_mpl 

  • NEMO/trunk/src/TOP/AGE/trcnam_age.F90

    r12377 r14842  
    5353      ln_trc_cbc(jp_age) = .false. 
    5454      ln_trc_obc(jp_age) = .false. 
     55      ln_trc_ais(jp_age) = .false. 
    5556      ! 
    5657      READ  ( numnat_ref, namage, IOSTAT = ios, ERR = 901) 
Note: See TracChangeset for help on using the changeset viewer.