wallo_control Subroutine

subroutine wallo_control(iwallo)

Uses

  • proc~~wallo_control~~UsesGraph proc~wallo_control wallo_control module~basin_module basin_module proc~wallo_control->module~basin_module module~constituent_mass_module constituent_mass_module proc~wallo_control->module~constituent_mass_module module~hru_module hru_module proc~wallo_control->module~hru_module module~hydrograph_module hydrograph_module proc~wallo_control->module~hydrograph_module module~organic_mineral_mass_module organic_mineral_mass_module proc~wallo_control->module~organic_mineral_mass_module module~plant_module plant_module proc~wallo_control->module~plant_module module~soil_module soil_module proc~wallo_control->module~soil_module module~time_module time_module proc~wallo_control->module~time_module module~water_allocation_module water_allocation_module proc~wallo_control->module~water_allocation_module module~hydrograph_module->module~basin_module module~hydrograph_module->module~time_module module~carbon_module carbon_module module~organic_mineral_mass_module->module~carbon_module module~soil_module->module~carbon_module module~water_allocation_module->module~hydrograph_module

check if canal or inflow diversions and set available water from recall object set total volumes of canal diversions (source = "div") - rtb set total volumes of inflow diversions from recall file set total volumes of inflow diversions from monthly flow rate (m3/s) loop through each demand object zero demand, withdrawal, and unmet for each source set demand for each object if demand - check source availability check if water is available from each source - set withdrawal and unmet loop through sources again to check if compensation is allowed compute total withdrawal for demand object from all sources if irrigating set amount applied and runoff irrigation demand treatment of withdrawn water no treatment - treated = withdrawal compute treatment by inputting the mass or concentrations transfer (diversion) of withdrawn and possibly treated water sum demand, withdrawal, and unmet for entire allocation object

Arguments

Type IntentOptional Attributes Name
integer, intent(inout) :: iwallo

Calls

proc~~wallo_control~~CallsGraph proc~wallo_control wallo_control cs_irrig cs_irrig proc~wallo_control->cs_irrig salt_irrig salt_irrig proc~wallo_control->salt_irrig wallo_demand wallo_demand proc~wallo_control->wallo_demand wallo_transfer wallo_transfer proc~wallo_control->wallo_transfer wallo_treatment wallo_treatment proc~wallo_control->wallo_treatment wallo_withdraw wallo_withdraw proc~wallo_control->wallo_withdraw