| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_wind.F |
184 |
EXF_WIND |
tmp2 = SQRT(tmp1*tmp1 + ustar*ustar/cquadrag_1) |
|
./pkg/exf/exf_wind.F |
185 |
EXF_WIND |
wsLoc(i,j) = SQRT(tmp1 + tmp2) |
|
./pkg/exf/exf_wind.F |
188 |
EXF_WIND |
tmp2 = ustar*ustar/clindrag_1*exf_half |
|
./pkg/exf/exf_wind.F |
193 |
EXF_WIND |
tmp4 = (tmp2 + tmp3)**oneThirdRL |
|
./pkg/exf/exf_wind.F |
63 |
EXF_WIND |
_RL tmp1, tmp2, tmp3, tmp4 |
|
./pkg/fizhi/fizhi_moist.F |
475 |
MOISTIO |
tmp2(i,1) = TH(i,NSUBCL) * PLKE(i,NSUBCL)/P0KAPPA |
|
./pkg/fizhi/fizhi_moist.F |
477 |
MOISTIO |
tmp2(i,2) = tmp4(i,nsubcl) |
|
./pkg/fizhi/fizhi_moist.F |
481 |
MOISTIO |
call QSAT (tmp2(i,1),tmp2(i,2),tmp2(i,3),dum,.false.) |
|
./pkg/fizhi/fizhi_moist.F |
482 |
MOISTIO |
rh = SHL(I,NSUBCL) / tmp2(i,3) |
|
./pkg/land/land_impl_temp.F |
180 |
LAND_IMPL_TEMP |
tmp2 = tg(2) |
|
./pkg/land/land_impl_temp.F |
202 |
LAND_IMPL_TEMP |
& tmp2,(tmp1+alpha*fLoc)*beta |
|
./pkg/land/land_impl_temp.F |
86 |
LAND_IMPL_TEMP |
_RL tmp1, tmp2 |
|
./eesupp/src/global_vec_sum.F |
128 |
GLOBAL_VEC_SUM_R8 |
Real*8 tmp1(nval), tmp2(nval) |
|
./eesupp/src/global_vec_sum.F |
152 |
GLOBAL_VEC_SUM_R8 |
CALL MPI_ALLREDUCE(tmp1,tmp2,nval,MPI_DOUBLE_PRECISION, |
|
./eesupp/src/global_vec_sum.F |
158 |
GLOBAL_VEC_SUM_R8 |
sumPhi( i, 1,1 ) = tmp2(i) |
|
./eesupp/src/global_vec_sum.F |
210 |
GLOBAL_VEC_SUM_INT |
INTEGER tmp1(nval), tmp2(nval) |
|
./eesupp/src/global_vec_sum.F |
234 |
GLOBAL_VEC_SUM_INT |
CALL MPI_ALLREDUCE(tmp1,tmp2,nval,MPI_INTEGER, |
|
./eesupp/src/global_vec_sum.F |
240 |
GLOBAL_VEC_SUM_INT |
sumPhi( i, 1,1 ) = tmp2(i) |
|
./eesupp/src/global_vec_sum.F |
46 |
GLOBAL_VEC_SUM_R4 |
Real*4 tmp1(nval), tmp2(nval) |
|
./eesupp/src/global_vec_sum.F |
70 |
GLOBAL_VEC_SUM_R4 |
CALL MPI_ALLREDUCE(tmp1,tmp2,nval,MPI_REAL, |
|
./eesupp/src/global_vec_sum.F |
76 |
GLOBAL_VEC_SUM_R4 |
sumPhi( i, 1,1 ) = tmp2(i) |
|
./pkg/cal/cal_timeinterval.F |
51 |
CAL_TIMEINTERVAL |
_RL tmp1, tmp2 |
|
./pkg/cal/cal_timeinterval.F |
73 |
CAL_TIMEINTERVAL |
tmp2 = secondsperday |
|
./pkg/cal/cal_timeinterval.F |
74 |
CAL_TIMEINTERVAL |
nsecs = int(timeint - tmp1 * tmp2 ) |
|
./lsopt/instore.F |
45 |
INSTORE |
tmp2 = isize |
|
./lsopt/instore.F |
46 |
INSTORE |
rectmp = tmp1*tmp2 |
|
./lsopt/instore.F |
9 |
INSTORE |
integer*8 rectmp, tmp1, tmp2 |