File |
Line number |
Procedure |
Code |
./model/src/ini_masks_etc.F |
181 |
INI_MASKS_ETC |
tmpVar2(i,j) = 0. |
./model/src/ini_masks_etc.F |
190 |
INI_MASKS_ETC |
tmpVar2(i,j) = tmpVar2(i,j) + drF(k)*hFacC(i,j,k,bi,bj) |
./model/src/ini_masks_etc.F |
205 |
INI_MASKS_ETC |
Ro_surf(i,j,bi,bj) = R_low(i,j,bi,bj) + tmpVar2(i,j) |
./model/src/ini_masks_etc.F |
366 |
INI_MASKS_ETC |
tmpVar2(i,j) = 0. _d 0 |
./model/src/ini_masks_etc.F |
373 |
INI_MASKS_ETC |
tmpVar2(i,j) = tmpVar2(i,j) + drF(k)*hFacS(i,j,k,bi,bj) |
./model/src/ini_masks_etc.F |
383 |
INI_MASKS_ETC |
rSurfS(i,j,bi,bj) = rLowS(i,j,bi,bj) + tmpVar2(i,j) |
./model/src/ini_masks_etc.F |
404 |
INI_MASKS_ETC |
tmpVar2(i,j) = rLowS(i,j,bi,bj) + tmpVar2(i,j) |
./model/src/ini_masks_etc.F |
405 |
INI_MASKS_ETC |
tmpVar2(i,j) = ( tmpVar2(i,j) -rSurfS(i,j,bi,bj) )*halfRL |
./model/src/ini_masks_etc.F |
410 |
INI_MASKS_ETC |
rSurfS(i,j,bi,bj) = rSurfS(i,j,bi,bj) + tmpVar2(i,j) |
./model/src/ini_masks_etc.F |
411 |
INI_MASKS_ETC |
rLowS (i,j,bi,bj) = rLowS (i,j,bi,bj) - tmpVar2(i,j) |
./model/src/ini_masks_etc.F |
48 |
INI_MASKS_ETC |
_RL tmpVar2(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |