Simple Leveled Lighting Calculator

1 collaborator

WHAT IS IT?

A simple calculator for comparing the levelized costs of two energy services investments. See http://www.ase.tufts.edu/gdae/education_materials/modules/RenewableEnergyEcon.pdf for a good, but dated (renewables are much cheaper now) overview of renewable electric power economics.

Note the formula, which is not quite ours,

For an energy source with constant energy production and no operating cost, the levelized cost of energy (LCOE) per kilowatt hour (kWh) can be calculated as:

annualized capital cost / annual kWh production

Note that an average of 3 hours a day of use throughout the year is the use case printed on the packaging by the manufacturer for comparison purposes. Seems reasonable, but who knows?

HOW IT WORKS

(what rules the agents use to create the overall behavior of the model)

HOW TO USE IT

(how to use the model, including a description of each of the items in the Interface tab)

THINGS TO NOTICE

(suggested things for the user to notice while running the model)

THINGS TO TRY

(suggested things for the user to try to do (move sliders, switches, etc.) with the model)

EXTENDING THE MODEL

(suggested things to add or change in the Code tab to make the model more complicated, detailed, accurate, etc.)

NETLOGO FEATURES

(interesting or unusual features of NetLogo that the model uses, particularly in the Code tab; or where workarounds were needed for missing features)

RELATED MODELS

(models in the NetLogo Models Library and elsewhere which are of related interest)

CREDITS AND REFERENCES

CC BY-NC-SA 3.0

This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 License. To view a copy of this license, visit https://creativecommons.org/licenses/by-nc-sa/3.0/ or send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, California 94305, USA.

Commercial licenses are also available. To inquire about commercial licenses, please contact Steven O. Kimbrough at kimbrough@wharton.upenn.edu.

Comments and Questions

Please start the discussion about this model! (You'll first need to log in.)

Click to Run Model

to-report AgivenP [K r n]
;    Given an initial capital outlay of K, an interest rate of r
;    and a project lifetime of n periods (years) after which the
;    capital purchased has zero value, the annualized capital cost
;    is
;        K(r(1+r)^n)/((1+r)^n - 1))
;    This really isn't a list problem, but so what.

    let numer  r * (1 + r) ^ n
    let denom  (1 + r) ^ n - 1
    report K * numer / denom
end 

to-report hoursperyear [hoursperday]
  report hoursperday * 365.25
end 

to-report annualusagecost [hoursperday watts centsakwhour]
  let hours  hoursperyear hoursperday
  let kwHours  watts * hours / 1000
  report centsakWhour * kWhours / 100
end 

to loada
  if  item-type = "Greenlite LED" [
  set A-price 1.58
  set A-life-in-years 13.6
  set A-watts 9
  output-print (word "A:\n"
"Greenlite LED\n60 Watts Equivalent 800 lumens")
  ]
  if item-type = "GE Soft White"[
  set A-price 1.58
  set A-life-in-years 0.9
  set A-watts 29
  output-print  (word  "A:\n"
"GE Soft White (incandescent)\n"
"40 Watts Equivalent "
"430 lumens")
  ]
end 

to loadb
  if  item-type = "Greenlite LED" [
  set B-price 1.58
  set B-life-in-years 13.6
  set B-watts 9
  output-print (word "B:\n"
"Greenlite LED\n60 Watts Equivalent 800 lumens")
  ]
  if item-type = "GE Soft White"[
  set B-price 1.58
  set B-life-in-years 0.9
  set B-watts 29
  output-print  (word  "B:\n"
"GE Soft White (incandescent)\n"
"40 Watts Equivalent "
"430 lumens")
  ]
end 

to load-column [column]
  if  item-type = "Greenlite LED" [
  run (word "set " column "-price 1.58")
  run (word "set " column "-life-in-years 13.6")
  run (word "set " column "-watts 9")
  output-print (word column ": (default)\n"
"Greenlite LED\n60 Watts Equivalent 800 lumens")
  ]
  if item-type = "GE Soft White"[
  run (word "set " column "-price 1.58")
  run (word "set " column "-life-in-years 0.9")
  run (word "set " column "-watts 29")
  output-print  (word column ": (default)\n"
"GE Soft White (incandescent)\n"
"40 Watts Equivalent "
"430 lumens")
  ]
  if item-type = "GE Halogen" [
    run (word "set " column "-price 5.49")
    run (word "set " column "-life-in-years 0.9")
    run (word "set " column "-watts 29")
    output-print  (word column ": (default)\n"
"GE Halogen\n"
"40 Watts Equivalent "
"430 lumens")
  ]
  if item-type = "Standard 60 W incandescent" [
    run (word "set " column "-price 0.0")
    run (word "set " column "-life-in-years 0.9")
    run (word "set " column "-watts 60")
    output-print  (word column ":\n"
"Standard incandescent\n"
"60 Watts "
"800 lumens")
  ]
end 

to setdefaults
  set item-type "Greenlite LED"
  load-column "A"
  set item-type "GE Soft White"
  load-column "B"
end 

to-report a-b-payback-period
   if a-price <= b-price [
     report "A must cost more than B for this analysis."]
   let diff (a-price - b-Price)
   let b-annual annualusagecost hours-per-day B-watts centsperkwhour
   let a-annual annualusagecost hours-per-day A-watts centsperkwhour

  report diff / (b-annual - a-annual)
end

There is only one version of this model, created about 7 years ago by Steven Kimbrough.

Attached files

File	Type	Description	Last updated
Simple Leveled Lighting Calculator.png	preview	Preview for 'Simple Leveled Lighting Calculator'	about 7 years ago, by Steven Kimbrough	Download

This model does not have any ancestors.

This model does not have any descendants.

NetLogo