Symbol
Description
Uses
OBShFac0
3
File
Line number
Procedure
Code
./pkg/obcs/obcs_init_fixed.F
82
OBCS_INIT_FIXED
OBShFac0
(
i
,
bi
,
bj
)
=0.
./pkg/obcs/obcs_init_fixed.F
93
OBCS_INIT_FIXED
IF
(
k
.LE.
Nr
)
OBShFac0
(
i
,
bi
,
bj
)
=
hFacS
(
i
,
j
,
k
,
bi
,
bj
)