Index | Rundeck: E6F40 | Created: Fri May 17 03:30:27 EDT 2024 |
irrigate_extract | Module: IRRIGMOD | File: IRRIGMOD.f |
Author : Michael Puma
Version:
Declaration:
subroutine irrigate_extract(i, j, mwl, gml, mldlk, tlake, flake, hlake_min, mwl_to_irrig, gml_to_irrig, irrig_gw, irrig_gw_energy, irrig_water_act, irrig_energy_act )
- rhow : used from constant
- teeny : used from constant
- shw : used from constant
- dtsrc : used from model_com
- modeleclock : used from model_com
- tearth : used from ghy_com
- axyp : used from geom
- fearth : used from ghy_com
- get_param : used from dictionary_mod
- i :
integer, intent(in)
- j :
integer, intent(in)
- jyear :
integer
- master_yr :
integer
- flake :
real*8, intent(in)
- local versions of lake variables
- tlake :
real*8, intent(in)
- local versions of lake variables
- mldlk :
real*8, intent(in)
- local versions of lake variables
- gml :
real*8, intent(in)
- local versions of lake variables
- mwl :
real*8, intent(in)
- local versions of lake variables
- cyclic :
logical
- mwl_to_irrig :
real*8, intent(out)
- (kg), GML_to_irrig (J) mass/energy changes
- hlake_min :
real*8, intent(in)
- irrig_gw :
real*8, intent(out)
- (m/s), irrig_gw_energy (W/m2) ground water diagnostics
- irrig_water_act :
real*8, intent(out)
- (m/s), irrig_energy_act (W/m2) actual irrigation diagnostics
- gml_to_irrig :
real*8, intent(out)
- mass :
- of water available for irrigation [kg]
- irrig_gw_energy :
real*8, intent(out)
- irrig_energy_act :
real*8, intent(out)
- mass :
- of water available for irrigation [kg]
- m_irr_pot :
real*8
- temperature :
- of abstracted irrigation water [deg C]
- m_avail :
real*8
- vegetated :
- and bare fractions of the grid cell
- t_irr :
real*8
- t_irr_g :
real*8
- t_irr2 :
real*8
- conversion :
- factor from m^3 water/(m^2 grid cell) to kg water
- fv :
real*8
- fb :
real*8
- flag :
- for external irrigation source (from deep aquifers - not modeled)
- m_to_kg :
real*8
- flag_irrig_grndwat :
integer