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 12202 for NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/tests/ISOMIP+ – NEMO

Ignore:
Timestamp:
2019-12-12T09:59:50+01:00 (5 years ago)
Author:
cetlod
Message:

dev_merge_option2 : merge in dev_r11613_ENHANCE-04_namelists_as_internalfiles

Location:
NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/tests/ISOMIP+/MY_SRC
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/tests/ISOMIP+/MY_SRC/dtatsd.F90

    r11889 r12202  
    6767      ierr0 = 0  ;  ierr1 = 0  ;  ierr2 = 0  ;  ierr3 = 0 
    6868      ! 
    69       REWIND( numnam_ref )              ! Namelist namtsd in reference namelist :  
    7069      READ  ( numnam_ref, namtsd, IOSTAT = ios, ERR = 901) 
    7170901   IF( ios /= 0 )   CALL ctl_nam ( ios , 'namtsd in reference namelist', lwp ) 
    72       REWIND( numnam_cfg )              ! Namelist namtsd in configuration namelist : Parameters of the run 
    7371      READ  ( numnam_cfg, namtsd, IOSTAT = ios, ERR = 902 ) 
    7472902   IF( ios >  0 )   CALL ctl_nam ( ios , 'namtsd in configuration namelist', lwp ) 

  • NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/tests/ISOMIP+/MY_SRC/eosbn2.F90

    r11889 r12202  
    13661366      !!---------------------------------------------------------------------- 
    13671367      ! 
    1368       REWIND( numnam_ref )              ! Namelist nameos in reference namelist : equation of state 
    13691368      READ  ( numnam_ref, nameos, IOSTAT = ios, ERR = 901 ) 
    13701369901   IF( ios /= 0 )   CALL ctl_nam ( ios , 'nameos in reference namelist', lwp ) 
    13711370      ! 
    1372       REWIND( numnam_cfg )              ! Namelist nameos in configuration namelist : equation of state 
    13731371      READ  ( numnam_cfg, nameos, IOSTAT = ios, ERR = 902 ) 
    13741372902   IF( ios >  0 )   CALL ctl_nam ( ios , 'nameos in configuration namelist', lwp ) 

  • NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/tests/ISOMIP+/MY_SRC/isfstp.F90

    r12062 r12202  
    289289      !!---------------------------------------------------------------------- 
    290290      ! 
    291       REWIND( numnam_ref )              ! Namelist namsbc_rnf in reference namelist : Runoffs  
    292291      READ  ( numnam_ref, namisf, IOSTAT = ios, ERR = 901) 
    293292901   IF( ios /= 0 )   CALL ctl_nam ( ios , 'namisf in reference namelist', lwp ) 
    294293      ! 
    295       REWIND( numnam_cfg )              ! Namelist namsbc_rnf in configuration namelist : Runoffs 
    296294      READ  ( numnam_cfg, namisf, IOSTAT = ios, ERR = 902 ) 
    297295902   IF( ios >  0 )   CALL ctl_nam ( ios , 'namisf in configuration namelist', lwp ) 

  • NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/tests/ISOMIP+/MY_SRC/tradmp.F90

    r11889 r12202  
    177177      !!---------------------------------------------------------------------- 
    178178      ! 
    179       REWIND( numnam_ref )   ! Namelist namtra_dmp in reference namelist : T & S relaxation 
    180179      READ  ( numnam_ref, namtra_dmp, IOSTAT = ios, ERR = 901) 
    181180901   IF( ios /= 0 )   CALL ctl_nam ( ios , 'namtra_dmp in reference namelist', lwp ) 
    182181      ! 
    183       REWIND( numnam_cfg )   ! Namelist namtra_dmp in configuration namelist : T & S relaxation 
    184182      READ  ( numnam_cfg, namtra_dmp, IOSTAT = ios, ERR = 902 ) 
    185183902   IF( ios >  0 )   CALL ctl_nam ( ios , 'namtra_dmp in configuration namelist', lwp ) 
Note: See TracChangeset for help on using the changeset viewer.