| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_clim_fields.h |
38 |
NO PROCEDURE |
& climtemp0, climtemp1 |
|
./pkg/exf/exf_clim_fields.h |
42 |
NO PROCEDURE |
_RL climtemp1 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
|
./pkg/exf/exf_set_climtemp.F |
101 |
EXF_SET_CLIMTEMP |
call EXF_SWAPFFIELDS_3D( climtemp0, climtemp1, mythid ) |
|
./pkg/exf/exf_set_climtemp.F |
105 |
EXF_SET_CLIMTEMP |
& , climtemp1, count1, mythid |
|
./pkg/exf/exf_set_climtemp.F |
108 |
EXF_SET_CLIMTEMP |
call EXF_FILTER_RL( climtemp1, climtempmask, mythid ) |
|
./pkg/exf/exf_set_climtemp.F |
110 |
EXF_SET_CLIMTEMP |
call EXF_FILTER_RS( climtemp1, climtempmask, mythid ) |
|
./pkg/exf/exf_set_climtemp.F |
124 |
EXF_SET_CLIMTEMP |
if (climtemp1(i,j,k,bi,bj) .lt. climtempfreeze) |
|
./pkg/exf/exf_set_climtemp.F |
125 |
EXF_SET_CLIMTEMP |
& climtemp1(i,j,k,bi,bj) = climtempfreeze |
|
./pkg/exf/exf_set_climtemp.F |
130 |
EXF_SET_CLIMTEMP |
& (exf_one - fac) * climtemp1(i,j,k,bi,bj) |
|
./pkg/exf/exf_set_climtemp.F |
192 |
EXF_INIT_CLIMTEMP |
climtemp1(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/exf/exf_set_climtemp.F |
91 |
EXF_SET_CLIMTEMP |
& , climtemp1, count0, mythid |
|
./pkg/exf/exf_set_climtemp.F |
94 |
EXF_SET_CLIMTEMP |
call EXF_FILTER_RL( climtemp1, climtempmask, mythid ) |
|
./pkg/exf/exf_set_climtemp.F |
96 |
EXF_SET_CLIMTEMP |
call EXF_FILTER_RS( climtemp1, climtempmask, mythid ) |