Changeset 3727
- Timestamp:
- 2012-12-10T16:35:39+01:00 (11 years ago)
- Location:
- branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG/ORCA2_LIM_CRS/EXP00/namelist_crs
r3622 r3727 1001 1001 ! odd-numbered. Asymmetry with 1002 1002 ! even-numbered nn_facty. 1003 nn_fcrs = 1 ! frequence of coarsening 1004 / 1003 nn_fcrs = 1 ! frequence of coarsening 1004 nn_msh_crs = 1 ! frequence of coarsening 1005 / -
branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG/ORCA2_LIM_CRS/MY_SRC/nemogcm.F90
r3622 r3727 209 209 !!---------------------------------------------------------------------- 210 210 ! 211 ! 211 212 cltxt = '' 212 213 ! … … 304 305 ENDIF 305 306 307 306 308 ! 307 309 IF( nn_timing == 1 ) CALL timing_init -
branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/NEMO/OPA_SRC/CRS/crs_dom.F90
r3626 r3727 28 28 INTEGER :: nperio_full, nperio_crs !: jperio of parent and coarse grids 29 29 INTEGER :: npolj_full, npolj_crs !: north fold mark 30 INTEGER :: npiglo_full, npiglo_crs , npiglo!: jpiglo31 INTEGER :: npjglo_full, npjglo_crs , npjglo!: jpjglo30 INTEGER :: npiglo_full, npiglo_crs !: jpiglo 31 INTEGER :: npjglo_full, npjglo_crs !: jpjglo 32 32 INTEGER :: nlci_full, nlcj_full !: i-, j-dimension of local or sub domain on parent grid 33 33 INTEGER :: nldi_full, nldj_full !: starting indices of internal sub-domain on parent grid -
branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/NEMO/OPA_SRC/CRS/crsini.F90
r3622 r3727 93 93 WRITE(numout,*) ' cn_binref = ', cn_binref 94 94 WRITE(numout,*) ' nn_fcrs = ', nn_fcrs 95 WRITE(numout,*) ' nn_msh_crs = ', nn_msh_crs95 WRITE(numout,*) ' nn_msh_crs = ', nn_msh_crs 96 96 ENDIF 97 97 … … 493 493 !--------------------------------------------------------- 494 494 495 !IF ( nn_msh_crs > 0 ) CALL crs_dom_wri495 IF ( nn_msh_crs > 0 ) CALL crs_dom_wri 496 496 497 497 WRITE(numout,*) 'crs_init done'
Note: See TracChangeset
for help on using the changeset viewer.