<% @header [("title", ["Sliding scale pledges"])]; if $"cmd" = "set" then val user = Init.getUser (); val shares = Web.stoi ($"pledge"); if shares <= 0 then %>

You can't make a non-positive pledge!

<% else Init.modUser {user with shares = shares} %>

Thank you for your pledge!

<% end elseif $"cmd" = "calc" then val user = Init.getUser (); val amt = Web.stor ($"amt"); val base = Money.costBase amt %>

Out of $<% amt %>, you would pay $<% Util.mult (#shares user, base) %> and the lowest share of the cost would be $<% base %>.

<% end val user = Init.getUser () %>

HCoop divides expenses among members based on a "sliding scale"-style scheme. We charge you only for our concrete expenses, not adding any expenses beyond what we pay to service providers and vendors. Whenever a concrete expense needs to be paid for, we divide it among the members based on how much each of you has pledged on this web page. Your pledge is a whole number 1 or higher which you can think of as indicating how many times the amount paid by the lowest-contributing members you are willing to pay. Concretely, every expense is divided by the sum of all members' pledges, and each member is charged an amount equal to the result of that division times his pledge number. This way everyone's monthly costs go down automatically as we gain new members.

Set your pledge number

Calculate your share of an expense

$

Members with pledges above 1

<% foreach usr in Init.byPledge () do %> <% end %>
<% #shares usr %> <% Web.html (#name usr) %>
<% @footer [] %>