| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_FIELDS.h |
191 |
NO PROCEDURE |
& evap, precip, snowprecip |
|
./pkg/exf/EXF_FIELDS.h |
198 |
NO PROCEDURE |
_RL precip (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_check_range.F |
142 |
EXF_CHECK_RANGE |
IF ( (precip(i,j,bi,bj) .LT. 0. .OR. |
|
./pkg/exf/exf_check_range.F |
143 |
EXF_CHECK_RANGE |
& precip(i,j,bi,bj) .GT. 2.E-6 ) .AND. |
|
./pkg/exf/exf_check_range.F |
147 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, precip(i,j,bi,bj) |
|
./pkg/exf/exf_diagnostics_fill.F |
51 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(precip, 'EXFpreci',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_getffields.F |
300 |
EXF_GETFFIELDS |
U precip, precip0, precip1, |
|
./pkg/exf/exf_getffields.F |
327 |
EXF_GETFFIELDS |
precip(i,j,bi,bj) = |
|
./pkg/exf/exf_getffields.F |
328 |
EXF_GETFFIELDS |
& MAX( precip(i,j,bi,bj), snowPrecip(i,j,bi,bj) ) |
|
./pkg/exf/exf_getffields.F |
518 |
EXF_GETFFIELDS |
& maskc, precip, xx_precip0, xx_precip1, xx_precip_dummy, |
|
./pkg/exf/exf_getffields.F |
649 |
EXF_GETFFIELDS |
precip(i,j,bi,bj)=precip(i,j,bi,bj)+xx_precip_mean(i,j,bi,bj) |
|
./pkg/exf/exf_getffields.F |
695 |
EXF_GETFFIELDS |
& precip(i,j,bi,bj)=precip(i,j,bi,bj)+ |
|
./pkg/exf/exf_getforcing.F |
219 |
EXF_GETFORCING |
sflux(i,j,bi,bj) = evap(i,j,bi,bj) - precip(i,j,bi,bj) |
|
./pkg/exf/exf_init_varia.F |
254 |
EXF_INIT_VARIA |
O precip, precip0, precip1, |
|
./pkg/exf/exf_mapfields.F |
161 |
EXF_MAPFIELDS |
& *( precip(i,j,bi,bj)- snowPrecip(i,j,bi,bj) ) |
|
./pkg/exf/exf_mapfields.F |
173 |
EXF_MAPFIELDS |
& + flami*precip(i,j,bi,bj)*rhoConstFresh |
|
./pkg/exf/exf_mapfields.F |
179 |
EXF_MAPFIELDS |
& *precip(i,j,bi,bj)*rhoConstFresh |
|
./pkg/exf/exf_monitor.F |
159 |
EXF_MONITOR |
CALL MON_WRITESTATS_RL( 1, precip, '_precip', |
|
./pkg/seaice/seaice_budget_ocean.F |
144 |
SEAICE_BUDGET_OCEAN |
sflux(i,j,bi,bj) = evap(i,j,bi,bj) - precip(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_precip.F |
126 |
THSICE_GET_PRECIP |
precip(i,j) = cheapPrecip(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_precip.F |
17 |
THSICE_GET_PRECIP |
O precip, snowPrc, qPrcRnO, flxSW, |
|
./pkg/thsice/thsice_get_precip.F |
56 |
THSICE_GET_PRECIP |
_RL precip (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_get_precip.F |
79 |
THSICE_GET_PRECIP |
precip(i,j) = ( rain(i,j,bi,bj)+runoff(i,j,bi,bj) )*rhofw |
|
./pkg/thsice/thsice_map_exf.F |
102 |
THSICE_MAP_EXF |
snowPrc(i,j) = precip(i,j,bi,bj)*rhoConstFresh |
|
./pkg/thsice/thsice_map_exf.F |
117 |
THSICE_MAP_EXF |
& *( precip(i,j,bi,bj)*rhoConstFresh - snowPrc(i,j) ) |
|
./pkg/thsice/thsice_map_exf.F |
72 |
THSICE_MAP_EXF |
totPrc(i,j) = precip(i,j,bi,bj)*rhoConstFresh |
|
./pkg/atm2d/AGRID.h |
19 |
NO PROCEDURE |
REAL*8 precip(jm0) ! precip (mm/day) (+=into ocean) |
|
./pkg/atm2d/AGRID.h |
9 |
NO PROCEDURE |
& dhfidtg,dhfidtgeq,precip,evao,evai,devodtg,devodtgeq, |
|
./pkg/atm2d/read_atmos.F |
58 |
READ_ATMOS |
atm_precip(j_atm) = -precip(j_atm)/secDay1000 |
|
./pkg/cheapaml/cheapaml.F |
484 |
CHEAPAML |
precip = 0. |
|
./pkg/cheapaml/cheapaml.F |
487 |
CHEAPAML |
precip = precip |
|
./pkg/cheapaml/cheapaml.F |
494 |
CHEAPAML |
precip = precip + ((q-ssqt(i,j)*0.9 _d 0)*dm/cheap_pr1) |
|
./pkg/cheapaml/cheapaml.F |
497 |
CHEAPAML |
cheapPrecip(i,j,bi,bj) = precip*1200/CheapHgrid(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml.F |
73 |
CHEAPAML |
_RL q,precip,ttt,entrain |
|
./pkg/ecco/cost_gencost_customize.F |
175 |
COST_GENCOST_CUSTOMIZE |
& precip(i,j,bi,bj)*maskC(i,j,1,bi,bj) |