File |
Line number |
Procedure |
Code |
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F |
354 |
INI_MASKS_ETC |
hFacUpper=drF(Km1)/(drF(Km1)+drF(K)) |
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F |
355 |
INI_MASKS_ETC |
IF (Km1.EQ.K) hFacUpper=0. |
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F |
362 |
INI_MASKS_ETC |
& hFacUpper+hFacLower*hFacC(I,J,K,bi,bj) |
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F |
51 |
INI_MASKS_ETC |
_RL hFacUpper,hFacLower |
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F |
363 |
INI_MASKS_ETC |
hFacUpper=drF(Km1)/(drF(Km1)+drF(K)) |
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F |
364 |
INI_MASKS_ETC |
IF (Km1.EQ.K) hFacUpper=0. |
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F |
371 |
INI_MASKS_ETC |
& hFacUpper+hFacLower*hFacC(I,J,K,bi,bj) |
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F |
55 |
INI_MASKS_ETC |
_RL hFacUpper,hFacLower |
./model/src/ini_masks_etc.F |
335 |
INI_MASKS_ETC |
hFacUpper=drF(Km1)/(drF(Km1)+drF(K)) |
./model/src/ini_masks_etc.F |
336 |
INI_MASKS_ETC |
IF (Km1.EQ.K) hFacUpper=0. |
./model/src/ini_masks_etc.F |
343 |
INI_MASKS_ETC |
& hFacUpper+hFacLower*hFacC(I,J,K,bi,bj) |
./model/src/ini_masks_etc.F |
51 |
INI_MASKS_ETC |
_RL hFacUpper,hFacLower |