Changeset 14433 for NEMO/trunk/src/SWE/stpctl.F90
- Timestamp:
- 2021-02-11T09:06:49+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/SWE/stpctl.F90
r14318 r14433 113 113 ! !== done by all processes at every time step ==! 114 114 ! 115 llmsk( 1:Nis1,:,:) = .FALSE.! exclude halos from the checked region116 llmsk(Nie 1:jpi,:,:) = .FALSE.117 llmsk(:, 1:Njs1,:) = .FALSE.118 llmsk(:,Nje 1:jpj,:) = .FALSE.115 llmsk( 1:nn_hls,:,:) = .FALSE. ! exclude halos from the checked region 116 llmsk(Nie0+1: jpi,:,:) = .FALSE. 117 llmsk(:, 1:nn_hls,:) = .FALSE. 118 llmsk(:,Nje0+1: jpj,:) = .FALSE. 119 119 ! 120 120 llmsk(Nis0:Nie0,Njs0:Nje0,1) = ssmask(Nis0:Nie0,Njs0:Nje0) == 1._wp ! define only the inner domain
Note: See TracChangeset
for help on using the changeset viewer.