module BrighterPlanet
  module Residence
    def self.included(base)
      base.extend ::Leap::Subject
      base.decide :emission, :with => :characteristics do
        committee :emission do
          quorum 'from fuel and electricity use and occupation and residents', :needs => [:fuel_oil_consumed, :natural_gas_consumed, :dirty_electricity_generated, :propane_consumed, :biomass_consumed, :kerosene_consumed, :coal_consumed, :residents, :electricity_emission_factor, :floorspace_estimate, :air_conditioner_use, :active_subtimeframe, :occupation] do |characteristics, timeframe|
            ( characteristics[:fuel_oil_consumed]           * ResidenceFuelType.find_by_name('fuel oil').emission_factor    +
              characteristics[:natural_gas_consumed]        * ResidenceFuelType.find_by_name('natural gas').emission_factor +
              characteristics[:propane_consumed]            * ResidenceFuelType.find_by_name('propane').emission_factor     +
              characteristics[:biomass_consumed]            * ResidenceFuelType.find_by_name('biomass').emission_factor     +
              characteristics[:kerosene_consumed]           * ResidenceFuelType.find_by_name('kerosene').emission_factor    +
              characteristics[:coal_consumed]               * ResidenceFuelType.find_by_name('coal').emission_factor        +
              characteristics[:dirty_electricity_generated] * characteristics[:electricity_emission_factor]                 +
              characteristics[:floorspace_estimate] * characteristics[:air_conditioner_use].fugitive_emission * (timeframe / timeframe.year) * characteristics[:occupation]
            ) *
            (characteristics[:active_subtimeframe] / timeframe) / characteristics[:residents]
          end
          
          quorum 'default' do
            raise "Residence's default emission quorum should never be called"
          end
        end
    
        committee :fuel_oil_consumed do # returns litres
          quorum 'from reports', :needs => :reported_annual_fuel_oil_consumption do |characteristics, timeframe|
            characteristics[:reported_annual_fuel_oil_consumption] * (timeframe / timeframe.year)
          end
          quorum 'from research', :needs => [:predicted_annual_fuel_oil_consumption, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_fuel_oil_consumption] + (characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:fuel_oil]).joules.to(:litres_of_fuel_oil) ) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :natural_gas_consumed do # returns joules
          quorum 'from reports', :needs => :reported_annual_natural_gas_consumption do |characteristics, timeframe|
            characteristics[:reported_annual_natural_gas_consumption] * (timeframe / timeframe.year)
          end
          quorum 'from research', :needs => [:predicted_annual_natural_gas_consumption, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_natural_gas_consumption] + (characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:natural_gas])) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :propane_consumed do # returns litres
          quorum 'from reports', :needs => :reported_annual_propane_consumption do |characteristics, timeframe|
            characteristics[:reported_annual_propane_consumption] * (timeframe / timeframe.year)
          end
          quorum 'from research', :needs => [:predicted_annual_propane_consumption, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_propane_consumption] + (characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:propane]).joules.to(:litres_of_propane)) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :biomass_consumed do # returns joules
          quorum 'from reports', :needs => :reported_annual_biomass_consumption do |characteristics, timeframe|
            characteristics[:reported_annual_biomass_consumption] * (timeframe / timeframe.year)
          end
          quorum 'from research', :needs => [:predicted_annual_biomass_consumption, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_biomass_consumption] + (characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:biomass])) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :kerosene_consumed do # returns litres
          quorum 'from reports', :needs => :reported_annual_kerosene_consumption do |characteristics, timeframe|
            characteristics[:reported_annual_kerosene_consumption] * (timeframe / timeframe.year)
          end
          quorum 'from research', :needs => [:predicted_annual_kerosene_consumption, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_kerosene_consumption] + (characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:kerosene]).joules.to(:litres_of_kerosene)) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :coal_consumed do # returns kg
          quorum 'from reports', :needs => :reported_annual_coal_consumption do |characteristics, timeframe|
            characteristics[:reported_annual_coal_consumption] * (timeframe / timeframe.year)
          end
          quorum 'from research', :needs => [:predicted_annual_coal_consumption, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_coal_consumption] + (characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:coal]).joules.to(:kilograms_of_coal)) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :dirty_electricity_generated do
          quorum 'from electricity generated and green electricity', :needs => [:electricity_generated, :green_electricity] do |characteristics|
            characteristics[:electricity_generated] * (1.0 - characteristics[:green_electricity])
          end
        end
        
        committee :green_electricity do
          quorum 'default' do
            ::Pet.fallback.green_electricity
          end
        end
        
        committee :electricity_generated do # returns kWh
          quorum 'from electricity used and loss rate', :needs => [:electricity_used, :electricity_loss_rate] do |characteristics|
            characteristics[:electricity_used] / (1.0 - characteristics[:electricity_loss_rate])
          end
        end
        
        committee :electricity_used do # returns kWh
          quorum 'from reports', :needs => :reported_annual_electricity_use do |characteristics, timeframe|
            characteristics[:reported_annual_electricity_use] * (timeframe / timeframe.year)
          end
          
          quorum 'from research', :needs => [:predicted_annual_electricity_use, :predicted_fuel_shares, :missing_annual_energy, :occupation] do |characteristics, timeframe|
            (characteristics[:predicted_annual_electricity_use] + ((characteristics[:missing_annual_energy] * characteristics[:predicted_fuel_shares][:electricity]).joules.to(:kilowatt_hours))) * (timeframe / timeframe.year) * characteristics[:occupation] / ::Pet.fallback.occupation
          end
        end
        
        committee :missing_annual_energy do # returns joules
          quorum 'from fuel reports', :needs => [:predicted_annual_fuel_oil_consumption, :predicted_annual_natural_gas_consumption, :predicted_annual_propane_consumption, :predicted_annual_kerosene_consumption, :predicted_annual_biomass_consumption, :predicted_annual_coal_consumption, :predicted_annual_electricity_use], :appreciates => [:reported_annual_fuel_oil_consumption, :reported_annual_natural_gas_consumption, :reported_annual_propane_consumption, :reported_annual_kerosene_consumption, :reported_annual_biomass_consumption, :reported_annual_coal_consumption, :reported_annual_electricity_use] do |characteristics|
            energy = 0
            if characteristics[:reported_annual_fuel_oil_consumption] and characteristics[:reported_annual_fuel_oil_consumption].zero?
              energy += characteristics[:predicted_annual_fuel_oil_consumption].litres_of_fuel_oil.to :joules
            end
            if characteristics[:reported_annual_natural_gas_consumption] and characteristics[:reported_annual_natural_gas_consumption].zero?
              energy += characteristics[:predicted_annual_natural_gas_consumption]
            end
            if characteristics[:reported_annual_propane_consumption] and characteristics[:reported_annual_propane_consumption].zero?
              energy += characteristics[:predicted_annual_propane_consumption].litres_of_propane.to :joules
            end
            if characteristics[:reported_annual_kerosene_consumption] and characteristics[:reported_annual_kerosene_consumption].zero?
              energy += characteristics[:predicted_annual_kerosene_consumption].litres_of_kerosene.to :joules
            end
            if characteristics[:reported_annual_biomass_consumption] and characteristics[:reported_annual_biomass_consumption].zero?
              energy += characteristics[:predicted_annual_biomass_consumption]
            end
            if characteristics[:reported_annual_coal_consumption] and characteristics[:reported_annual_coal_consumption].zero?
              energy += characteristics[:predicted_annual_coal_consumption].kilograms_of_coal.to :joules
            end
            if characteristics[:reported_annual_electricity_use] and characteristics[:reported_annual_electricity_use].zero?
              energy += characteristics[:predicted_annual_electricity_use].kilowatt_hours.to :joules
            end
            energy
          end
        end
        
        committee :electricity_loss_rate do # returns percentage
          quorum 'from egrid region', :needs => :egrid_region do |characteristics|
            characteristics[:egrid_region].loss_factor
          end
    
          quorum 'default' do
            EgridRegion.fallback.loss_factor
          end
        end
        
        committee :electricity_emission_factor do # returns kg CO2 / kWh
          quorum 'from egrid subregion', :needs => :egrid_subregion do |characteristics|
            characteristics[:egrid_subregion].electricity_emission_factor
          end
    
          quorum 'default' do
            EgridSubregion.fallback.electricity_emission_factor
          end
        end
        
        committee :egrid_region do
          quorum 'from egrid subregion', :needs => :egrid_subregion do |characteristics|
            characteristics[:egrid_subregion].egrid_region
          end
        end
        
        committee :egrid_subregion do
          quorum 'from_zip_code', :needs => :zip_code do |characteristics|
            characteristics[:zip_code].egrid_subregion
          end
        end
        
        committee :occupation do
          quorum 'default' do
            ::Pet.fallback.occupation
          end
        end
        
        committee :residents do
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average :residents
          end
          
          quorum 'default' do
            ::Pet.fallback.residents_before_type_cast
          end
        end
    
        committee :air_conditioner_use do
          quorum 'default' do
            AirConditionerUse.fallback
          end
        end
        
        committee :predicted_fuel_shares do # returns an array of percentages
          quorum 'from research', :needs => [:predicted_annual_energy_consumption, :predicted_annual_fuel_oil_consumption, :predicted_annual_natural_gas_consumption, :predicted_annual_propane_consumption, :predicted_annual_kerosene_consumption, :predicted_annual_biomass_consumption, :predicted_annual_coal_consumption, :predicted_annual_electricity_use] do |characteristics|
            {
              :fuel_oil => characteristics[:predicted_annual_fuel_oil_consumption].litres_of_fuel_oil.to(:joules) / characteristics[:predicted_annual_energy_consumption],
              :natural_gas => characteristics[:predicted_annual_natural_gas_consumption] / characteristics[:predicted_annual_energy_consumption],
              :propane => characteristics[:predicted_annual_propane_consumption].litres_of_propane.to(:joules) / characteristics[:predicted_annual_energy_consumption],
              :kerosene => characteristics[:predicted_annual_kerosene_consumption].litres_of_kerosene.to(:joules) / characteristics[:predicted_annual_energy_consumption],
              :biomass => characteristics[:predicted_annual_biomass_consumption] / characteristics[:predicted_annual_energy_consumption],
              :coal => characteristics[:predicted_annual_coal_consumption].kilograms_of_coal.to(:joules) / characteristics[:predicted_annual_energy_consumption],
              :electricity => characteristics[:predicted_annual_electricity_use].kilowatt_hours.to(:joules) / characteristics[:predicted_annual_energy_consumption]
            }
          end
        end
    
        committee :predicted_annual_energy_consumption do # returns BTUs
          quorum 'from research', :needs => [:predicted_annual_fuel_oil_consumption, :predicted_annual_natural_gas_consumption, :predicted_annual_propane_consumption, :predicted_annual_kerosene_consumption, :predicted_annual_biomass_consumption, :predicted_annual_coal_consumption, :predicted_annual_electricity_use] do |characteristics|
            energy = 0
            energy += characteristics[:predicted_annual_fuel_oil_consumption].litres_of_fuel_oil.to :joules
            energy += characteristics[:predicted_annual_natural_gas_consumption]
            energy += characteristics[:predicted_annual_propane_consumption].litres_of_propane.to :joules
            energy += characteristics[:predicted_annual_kerosene_consumption].litres_of_kerosene.to :joules
            energy += characteristics[:predicted_annual_biomass_consumption]
            energy += characteristics[:predicted_annual_coal_consumption].kilograms_of_coal.to :joules
            energy += characteristics[:predicted_annual_electricity_use].kilowatt_hours.to :joules
          end
        end
    
        committee :reported_annual_fuel_oil_consumption do # returns litres
          quorum 'from volume estimate', :needs => :annual_fuel_oil_volume_estimate do |characteristics|
            characteristics[:annual_fuel_oil_volume_estimate]
          end
          
          quorum 'from cost', :needs => :annual_fuel_oil_cost, :appreciates => :state do |characteristics, timeframe|
            relaxations = []
            relaxations << { :timeframe => timeframe,           :location => characteristics[:state] } if characteristics[:state]
            relaxations << { :timeframe => timeframe.last_year, :location => characteristics[:state] } if characteristics[:state]
            relaxations << { :timeframe => timeframe,           :location => Country.united_states   }
            relaxations << { :timeframe => timeframe.last_year, :location => Country.united_states   }
            if price_per_unit = ResidenceFuelType[:fuel_oil].price_per_unit(relaxations)
              characteristics[:annual_fuel_oil_cost] / price_per_unit
            else
              nil
            end
          end
        end
        
        committee :predicted_annual_fuel_oil_consumption do # returns litres
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average(%w(heating_space heating_water appliances).map { |purpose| "annual_energy_from_fuel_oil_for_#{purpose}".to_sym }).to_f.joules.to(:litres_of_fuel_oil)
          end
    
          quorum 'default' do
            ::Pet.fallback.annual_fuel_oil_volume_estimate
          end
        end
        
        committee :reported_annual_natural_gas_consumption do # returns joules
          quorum 'from volume estimate', :needs => :monthly_natural_gas_volume_estimate do |characteristics|
            characteristics[:monthly_natural_gas_volume_estimate] * 12
          end
          
          quorum 'from cost', :needs => :monthly_natural_gas_cost, :appreciates => :state do |characteristics, timeframe|
            relaxations = []
            relaxations << { :timeframe => timeframe,           :location => characteristics[:state] } if characteristics[:state]
            relaxations << { :timeframe => timeframe.last_year, :location => characteristics[:state] } if characteristics[:state]
            relaxations << { :timeframe => timeframe,           :location => Country.united_states   }
            relaxations << { :timeframe => timeframe.last_year, :location => Country.united_states   }
            if price_per_unit = ResidenceFuelType[:natural_gas].price_per_unit(relaxations) #FIXME joules vs. cubic metres issue
              characteristics[:monthly_natural_gas_cost] * 12 / price_per_unit
            else
              nil
            end
          end
        end
        
        committee :predicted_annual_natural_gas_consumption do # returns joules
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average(%w(heating_space heating_water appliances).map { |purpose| "annual_energy_from_natural_gas_for_#{purpose}".to_sym }).to_f
          end
    
          quorum 'default' do
            ::Pet.fallback.monthly_natural_gas_volume_estimate * 12
          end
        end
        
        committee :reported_annual_propane_consumption do # returns litres
          quorum 'from volume estimate', :needs => :annual_propane_volume_estimate do |characteristics|
            characteristics[:annual_propane_volume_estimate]
          end
          
          quorum 'from cost', :needs => :annual_propane_cost, :appreciates => :state do |characteristics, timeframe|
            relaxations = []
            relaxations << { :timeframe => timeframe,           :location => characteristics[:state].petroleum_administration_for_defense_district } if characteristics[:state]
            relaxations << { :timeframe => timeframe.last_year, :location => characteristics[:state].petroleum_administration_for_defense_district } if characteristics[:state]
            relaxations << { :timeframe => timeframe,           :location => Country.united_states   }
            relaxations << { :timeframe => timeframe.last_year, :location => Country.united_states   }
            if price_per_unit = ResidenceFuelType[:propane].price_per_unit(relaxations)
              characteristics[:annual_propane_cost] / price_per_unit
            else
              nil
            end
          end
        end
        
        committee :predicted_annual_propane_consumption do # returns litres
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average(%w(heating_space heating_water appliances).map { |purpose| "annual_energy_from_propane_for_#{purpose}".to_sym }).to_f.joules.to(:litres_of_propane)
          end
    
          quorum 'default' do
            ::Pet.fallback.annual_propane_volume_estimate
          end
        end
        
        committee :reported_annual_kerosene_consumption do # returns litres
          quorum 'from volume estimate', :needs => :annual_kerosene_volume_estimate do |characteristics|
            characteristics[:annual_kerosene_volume_estimate]
          end
        end
        
        committee :predicted_annual_kerosene_consumption do # returns litres
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average(:annual_energy_from_kerosene).to_f.joules.to(:litres_of_kerosene)
          end
    
          quorum 'default' do
            ::Pet.fallback.annual_kerosene_volume_estimate
          end
        end
        
        committee :reported_annual_biomass_consumption do # returns joules
          quorum 'from volume estimate', :needs => :annual_wood_volume_estimate do |characteristics|
            characteristics[:annual_wood_volume_estimate]
          end
        end
        
        committee :predicted_annual_biomass_consumption do # returns joules
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average(:annual_energy_from_wood)
          end
    
          quorum 'default' do
            ::Pet.fallback.annual_wood_volume_estimate
          end
        end
        
        committee :reported_annual_coal_consumption do # returns kg
          quorum 'from volume estimate', :needs => :annual_coal_volume_estimate do |characteristics|
            characteristics[:annual_coal_volume_estimate]
          end
        end
        
        committee :predicted_annual_coal_consumption do # returns kg
          quorum 'default' do
            ::Pet.fallback.annual_coal_volume_estimate
          end
        end
        
        committee :reported_annual_electricity_use do # returns kWh
          quorum 'from use estimate', :needs => :monthly_electricity_use_estimate do |characteristics|
            characteristics[:monthly_electricity_use_estimate] * 12
          end
          
          quorum 'from cost', :needs => :monthly_electricity_cost, :appreciates => :state do |characteristics, timeframe|
            relaxations = []
            relaxations << { :timeframe => timeframe,           :location => characteristics[:state] } if characteristics[:state]
            relaxations << { :timeframe => timeframe.last_year, :location => characteristics[:state] } if characteristics[:state]
            relaxations << { :timeframe => timeframe,           :location => Country.united_states   }
            relaxations << { :timeframe => timeframe.last_year, :location => Country.united_states   }
            if price_per_unit = ResidenceFuelType[:electricity].price_per_unit(relaxations)
              characteristics[:monthly_electricity_cost] * 12 / price_per_unit
            else
              nil
            end
          end
        end
        
        committee :predicted_annual_electricity_use do # returns kWh
          quorum 'from cohort', :needs => :cohort, :appreciates => [:clothes_machine_use, :refrigerator_count, :freezer_count, :dishwasher_use, :lighting_efficiency] do |characteristics|
            cohort = characteristics[:cohort]
            energy = cohort.weighted_average([:annual_energy_from_electricity_for_clothes_driers,
                                              :annual_energy_from_electricity_for_dishwashers,
                                              :annual_energy_from_electricity_for_freezers,
                                              :annual_energy_from_electricity_for_refrigerators,
                                              :annual_energy_from_electricity_for_air_conditioners,
                                              :annual_energy_from_electricity_for_heating_space,
                                              :annual_energy_from_electricity_for_heating_water,
                                              :annual_energy_from_electricity_for_other_appliances]).to_f
            
            if clothes_machine_use = characteristics[:clothes_machine_use]
              energy -= cohort.weighted_average(:annual_energy_from_electricity_for_clothes_driers)
              clothes_machine_use_cohort = ResidentialEnergyConsumptionSurveyResponse.big_cohort(characteristics.slice(*([:clothes_machine_use].push(*ResidentialEnergyConsumptionSurveyResponse::INPUT_CHARACTERISTICS))), ResidentialEnergyConsumptionSurveyResponse::SUBCOHORT_THRESHOLD)
              if clothes_machine_use_cohort.any?
                energy += clothes_machine_use_cohort.weighted_average(:annual_energy_from_electricity_for_clothes_driers).to_f
              else
                energy += charcteristics[:clothes_machine_use].annual_energy_from_electricity_for_clothes_driers
              end
            end
            
            if refrigerator_count = characteristics[:refrigerator_count]
              energy -= cohort.weighted_average(:annual_energy_from_electricity_for_refrigerators)
              if refrigerator_count == 0
                energy += 0
              else
                refrigerator_count_subcohort = ResidentialEnergyConsumptionSurveyResponse.big_cohort(characteristics.slice(*([:refrigerator_count].push(*ResidentialEnergyConsumptionSurveyResponse::INPUT_CHARACTERISTICS))), ResidentialEnergyConsumptionSurveyResponse::SUBCOHORT_THRESHOLD)
                if refrigerator_count_subcohort.any?
                  energy += refrigerator_count_subcohort.weighted_average(:annual_energy_from_electricity_for_refrigerators).to_f
                else
                  energy += refrigerator_count * ResidenceAppliance.annual_energy_from_electricity_for(:refrigerators)
                end
              end
            end
            
            if freezer_count = characteristics[:freezer_count]
              energy -= cohort.weighted_average(:annual_energy_from_electricity_for_freezers)
              if freezer_count == 0
                energy += 0
              else
                freezer_count_subcohort = ResidentialEnergyConsumptionSurveyResponse.big_cohort(characteristics.slice(*([:freezer_count].push(*ResidentialEnergyConsumptionSurveyResponse::INPUT_CHARACTERISTICS))), ResidentialEnergyConsumptionSurveyResponse::SUBCOHORT_THRESHOLD)
                if freezer_count_subcohort.any?
                  energy += freezer_count_subcohort.weighted_average(:annual_energy_from_electricity_for_freezers).to_f
                else
                  energy += freezer_count * ResidenceAppliance.annual_energy_from_electricity_for(:freezers)
                end
              end
            end
            
            if dishwasher_use = characteristics[:dishwasher_use]
              energy -= cohort.weighted_average(:annual_energy_from_electricity_for_dishwashers)
              dishwasher_use_cohort = ResidentialEnergyConsumptionSurveyResponse.big_cohort(characteristics.slice(*([:dishwasher_use].push(*ResidentialEnergyConsumptionSurveyResponse::INPUT_CHARACTERISTICS))), ResidentialEnergyConsumptionSurveyResponse::SUBCOHORT_THRESHOLD)
              if dishwasher_use_cohort.any?
                energy += dishwasher_use_cohort.weighted_average(:annual_energy_from_electricity_for_dishwashers).to_f
              else
                energy += characteristics[:dishwasher_use].annual_energy_from_electricity_for_dishwashers
              end
            end
            
            if lighting_efficiency = characteristics[:lighting_efficiency]
              lighting_electricity_use_in_cohort =
                cohort.weighted_average(:lighting_efficiency) * cohort.weighted_average(:lighting_use) * research(:efficient_lightbulb_power) +
                (1 - cohort.weighted_average(:lighting_efficiency)) * cohort.weighted_average(:lighting_use) * research(:standard_lightbulb_power)
              energy -= lighting_electricity_use_in_cohort.watt_hours.to :joules
              lighting_electricity_use_in_residence = 
                lighting_efficiency * cohort.weighted_average(:lighting_use) * research(:efficient_lightbulb_power) +
                (1 - lighting_efficiency) * cohort.weighted_average(:lighting_use) * research(:standard_lightbulb_power)
              energy += lighting_electricity_use_in_residence.watt_hours.to :joules
            end
            
            energy.joules.to(:kilowatt_hours)
          end
          
          quorum 'default' do
            ::Pet.fallback.monthly_electricity_use_estimate * 12
          end
        end
        
        committee :active_subtimeframe do
          quorum 'from acquisition and retirement', :needs => [:acquisition, :retirement] do |characteristics, timeframe|
            Timeframe.constrained_new characteristics[:acquisition].to_date, characteristics[:retirement].to_date, timeframe
          end
        end
        
        committee :acquisition do
          quorum 'from construction year', :needs => :construction_year do |characteristics|
            #FIXME this is an imperfect substitution for a line in https://app1.yerba.brighterplanet.com/changesets/9463
            characteristics[:construction_year] - 1.year
          end
          quorum 'from retirement', :appreciates => :retirement do |characteristics, timeframe|
            [ timeframe.from, characteristics[:retirement] ].compact.min
          end
        end
        
        committee :retirement do
          quorum 'from acquisition', :appreciates => :acquisition do |characteristics, timeframe|
            [ timeframe.to, characteristics[:acquisition] ].compact.max
          end
        end
        
        # This is kindof "hacky"
        # As implemented, this needs to be above floorspace committee or else cohort will always
        # use the ::Pet.fallback
        committee :floorspace_estimate do
          quorum 'from cohort', :needs => :cohort do |characteristics|
            characteristics[:cohort].weighted_average :floorspace
          end
          
          quorum 'default' do
            ::Pet.fallback.floorspace_estimate
          end
        end
        
        committee :cohort do
          quorum 'from residential energy consumption survey', :appreciates => ResidentialEnergyConsumptionSurveyResponse::INPUT_CHARACTERISTICS do |characteristics|
            cohort = ResidentialEnergyConsumptionSurveyResponse.big_cohort characteristics
            if cohort.any?
              cohort
            else
              nil
            end
          end
        end
        
        committee :bathrooms do
          quorum 'from fractional bathroom counts', :needs => [:full_bathrooms, :half_bathrooms] do |characteristics|
            characteristics[:full_bathrooms] + 0.5 * characteristics[:half_bathrooms]
          end
        end
        
        committee :census_region do
          quorum 'from census division', :needs => :census_division do |characteristics|
            characteristics[:census_division].census_region
          end
        end
        
        committee :census_division do
          quorum 'from state', :needs => :state do |characteristics|
            characteristics[:state].census_division
          end
        end
        
        committee :state do
          quorum 'from climate division', :needs => :climate_division do |characteristics|
            characteristics[:climate_division].state
          end
        end
    
        committee :floorspace do # returns a Range of floorspaces
          quorum 'from floorspace estimate', :needs => :floorspace_estimate do |characteristics|
            floorspace_estimate = characteristics[:floorspace_estimate]
            (floorspace_estimate - 50)..(floorspace_estimate + 50)
          end
        end
    
        committee :heating_degree_days do # returns a Range of degree-days
          quorum 'from climate division', :needs => :climate_division do |characteristics|
            days = characteristics[:climate_division].heating_degree_days
            (days - ClimateDivision::RADIUS)..(days + ClimateDivision::RADIUS)
          end
        end
        
        committee :cooling_degree_days do
          quorum 'from climate division', :needs => :climate_division do |characteristics|
            days = characteristics[:climate_division].cooling_degree_days
            (days - ClimateDivision::RADIUS)..(days + ClimateDivision::RADIUS)
          end
        end
        
        committee :climate_division do
          quorum 'from zip code', :needs => :zip_code do |characteristics|
            characteristics[:zip_code].climate_division
          end
        end
      end
    end
  end
end