| File |
Line number |
Procedure |
Code |
|
./pkg/grdchk/grdchk_get_position.F |
161 |
GRDCHK_GET_POSITION |
if ( maskSHI(i,j,k,bi,bj) .gt. 0.) then |
|
./pkg/grdchk/grdchk_get_position.F |
164 |
GRDCHK_GET_POSITION |
wetlocal = maskSHI(i,j,k,bi,bj) |
|
./pkg/grdchk/grdchk_loc.F |
211 |
GRDCHK_LOC |
if ( maskSHI(i,j,k,bi,bj) .gt. 0.) then |
|
./pkg/shelfice/SHELFICE.h |
112 |
NO PROCEDURE |
COMMON /SHELFICE_MASKS_CTRL/ maskSHI |
|
./pkg/shelfice/SHELFICE.h |
113 |
NO PROCEDURE |
_RS maskSHI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/shelfice/shelfice_init_fixed.F |
94 |
SHELFICE_INIT_FIXED |
& *maskSHI(i,j,1,bi,bj) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
212 |
SHELFICE_THERMODYNAMICS |
& maskSHI, xx_shifwflx_loc, xx_shifwflx0, xx_shifwflx1, |
|
./pkg/shelfice/shelfice_update_masks.F |
117 |
SHELFICE_UPDATE_MASKS |
maskSHI(I,J,K,bi,bj) = 0. _d 0 |
|
./pkg/shelfice/shelfice_update_masks.F |
126 |
SHELFICE_UPDATE_MASKS |
maskSHI(I,J,K,bi,bj) = 1. _d 0 |
|
./pkg/shelfice/shelfice_update_masks.F |
127 |
SHELFICE_UPDATE_MASKS |
maskSHI(I,J,1,bi,bj) = 1. _d 0 |
|
./pkg/ctrl/ctrl_init_wet.F |
135 |
CTRL_INIT_WET |
if (maskSHI(i,j,k,bi,bj) .eq. 1.) then |
|
./pkg/ctrl/ctrl_init_wet.F |
633 |
CTRL_INIT_WET |
CALL ACTIVE_WRITE_GEN_RS( 'maskCtrlI', maskSHI, 'XY', Nr, |