Changeset 14433 for NEMO/trunk/src/SAS
- Timestamp:
- 2021-02-11T09:06:49+01:00 (3 years ago)
- Location:
- NEMO/trunk/src/SAS
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/SAS/nemogcm.F90
r14239 r14433 340 340 ! 341 341 IF( ln_read_cfg ) THEN ! Read sizes in domain configuration file 342 CALL domain_cfg ( cn_cfg, nn_cfg, Ni0glo, Nj0glo, jpkglo, jperio)342 CALL domain_cfg ( cn_cfg, nn_cfg, Ni0glo, Nj0glo, jpkglo, l_Iperio, l_Jperio, l_NFold, c_NFtype ) 343 343 ELSE ! user-defined namelist 344 CALL usr_def_nam( cn_cfg, nn_cfg, Ni0glo, Nj0glo, jpkglo, jperio)344 CALL usr_def_nam( cn_cfg, nn_cfg, Ni0glo, Nj0glo, jpkglo, l_Iperio, l_Jperio, l_NFold, c_NFtype ) 345 345 ENDIF 346 346 ! -
NEMO/trunk/src/SAS/stpctl.F90
r14318 r14433 122 122 ! !== done by all processes at every time step ==! 123 123 ! 124 llmsk( 1:Nis1,:) = .FALSE.! exclude halos from the checked region125 llmsk(Nie 1:jpi,:) = .FALSE.126 llmsk(:, 1:Njs1) = .FALSE.127 llmsk(:,Nje 1:jpj) = .FALSE.124 llmsk( 1:nn_hls,:) = .FALSE. ! exclude halos from the checked region 125 llmsk(Nie0+1: jpi,:) = .FALSE. 126 llmsk(:, 1:nn_hls) = .FALSE. 127 llmsk(:,Nje0+1: jpj) = .FALSE. 128 128 ! 129 129 llmsk(Nis0:Nie0,Njs0:Nje0) = tmask(Nis0:Nie0,Njs0:Nje0,1) == 1._wp ! test only the inner domain
Note: See TracChangeset
for help on using the changeset viewer.