Changeset 4319
- Timestamp:
- 2013-11-27T10:30:02+01:00 (11 years ago)
- Location:
- branches/2013/dev_MERGE_2013/NEMOGCM/NEMO
- Files:
-
- 10 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/LIM_SRC_2/iceini_2.F90
r4309 r4319 75 75 CALL ctl_opn( numnam_ice_ref, 'namelist_ice_ref', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp ) 76 76 CALL ctl_opn( numnam_ice_cfg, 'namelist_ice_cfg', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp ) 77 CALL ctl_opn( numoni, 'output.namelist.ice', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp, 1 )77 CALL ctl_opn( numoni, 'output.namelist.ice', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp, 1 ) 78 78 79 79 ! When Diurnal cycle, core bulk and LIM2 are activated, -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/LIM_SRC_3/iceini.F90
r4309 r4319 74 74 CALL ctl_opn( numnam_ice_ref, 'namelist_ice_ref', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp ) 75 75 CALL ctl_opn( numnam_ice_cfg, 'namelist_ice_cfg', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp ) 76 CALL ctl_opn( numoni, 'output.namelist.ice', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp, 1 )76 CALL ctl_opn( numoni, 'output.namelist.ice', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp, 1 ) 77 77 ! 78 78 CALL ice_run ! set some ice run parameters -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OFF_SRC/nemogcm.F90
r4290 r4319 155 155 CALL ctl_opn( numnam_ref, 'namelist_ref', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 156 156 CALL ctl_opn( numnam_cfg, 'namelist_cfg', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 157 CALL ctl_opn( numond, 'output.namelist.dyn', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 )157 CALL ctl_opn( numond, 'output.namelist.dyn', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 ) 158 158 ! 159 159 REWIND( numnam_ref ) ! Namelist namctl in reference namelist : Control prints & Benchmark -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OOO_SRC/nemogcm.F90
r4290 r4319 141 141 CALL ctl_opn( numnam_ref, 'namelist_ref', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 142 142 CALL ctl_opn( numnam_cfg, 'namelist_cfg', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 143 CALL ctl_opn( numond, 'output.namelist.dyn', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 )143 CALL ctl_opn( numond, 'output.namelist.dyn', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 ) 144 144 ! 145 145 REWIND( numnam_ref ) ! Namelist namctl in reference namelist : Control prints & Benchmark -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r4309 r4319 241 241 CALL ctl_opn( numnam_ref, 'namelist_ref', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 242 242 CALL ctl_opn( numnam_cfg, 'namelist_cfg', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 243 CALL ctl_opn( numond, 'output.namelist.dyn', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 )243 CALL ctl_opn( numond, 'output.namelist.dyn', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 ) 244 244 ! 245 245 REWIND( numnam_ref ) ! Namelist namctl in reference namelist : Control prints & Benchmark -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/SAS_SRC/nemogcm.F90
r4290 r4319 168 168 CALL ctl_opn( numnam_ref, 'namelist_ref', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 169 169 CALL ctl_opn( numnam_cfg, 'namelist_cfg', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 170 CALL ctl_opn( numond, 'output.namelist.dyn', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 )170 CALL ctl_opn( numond, 'output.namelist.dyn', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. , 1 ) 171 171 ! 172 172 REWIND( numnam_ref ) ! Namelist namctl in reference namelist : Control prints & Benchmark -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/TOP_SRC/C14b/trcnam_c14b.F90
r4147 r4319 58 58 CALL ctl_opn( numnatb_ref, 'namelist_c14b_ref' , 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 59 59 CALL ctl_opn( numnatb_cfg, 'namelist_c14b_cfg' , 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 60 CALL ctl_opn( numonb , 'output.namelist.c14', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. )60 CALL ctl_opn( numonb , 'output.namelist.c14', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 61 61 REWIND( numnatb_ref ) ! Namelist namc14date in reference namelist : c14b parameters 62 62 READ ( numnatb_ref, namc14date, IOSTAT = ios, ERR = 901) -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/TOP_SRC/CFC/trcnam_cfc.F90
r4147 r4319 55 55 CALL ctl_opn( numnatc_ref, 'namelist_cfc_ref' , 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 56 56 CALL ctl_opn( numnatc_cfg, 'namelist_cfc_cfg' , 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 57 CALL ctl_opn( numonc , 'output.namelist.cfc', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. )57 CALL ctl_opn( numonc , 'output.namelist.cfc', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 58 58 59 59 REWIND( numnatc_ref ) ! Namelist namcfcdate in reference namelist : CFC parameters -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/TOP_SRC/PISCES/trcnam_pisces.F90
r4147 r4319 72 72 CALL ctl_opn( numnatp_ref, TRIM( clname )//'_ref', 'OLD' , 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 73 73 CALL ctl_opn( numnatp_cfg, TRIM( clname )//'_cfg', 'OLD' , 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 74 CALL ctl_opn( numonp , 'output.namelist.pis' , ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. )74 CALL ctl_opn( numonp , 'output.namelist.pis' , 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 75 75 ! 76 76 IF( .NOT.lk_iomput .AND. ln_diatrc ) THEN -
branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/TOP_SRC/trcnam.F90
r4309 r4319 187 187 CALL ctl_opn( numnat_ref, 'namelist_top_ref' , 'OLD' , 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 188 188 CALL ctl_opn( numnat_cfg, 'namelist_top_cfg' , 'OLD' , 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE. ) 189 CALL ctl_opn( numont , 'output.namelist.top', ' REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE., 1 )189 CALL ctl_opn( numont , 'output.namelist.top', 'UNKNOWN', 'FORMATTED', 'SEQUENTIAL', -1, numout, .FALSE., 1 ) 190 190 191 191 REWIND( numnat_ref ) ! Namelist namtrc in reference namelist : Passive tracer variables
Note: See TracChangeset
for help on using the changeset viewer.