summaryrefslogtreecommitdiff
path: root/product/client/server/domain/payroll/UnitPrice.cs
diff options
context:
space:
mode:
Diffstat (limited to 'product/client/server/domain/payroll/UnitPrice.cs')
-rw-r--r--product/client/server/domain/payroll/UnitPrice.cs17
1 files changed, 5 insertions, 12 deletions
diff --git a/product/client/server/domain/payroll/UnitPrice.cs b/product/client/server/domain/payroll/UnitPrice.cs
index 293ab17..0f1c450 100644
--- a/product/client/server/domain/payroll/UnitPrice.cs
+++ b/product/client/server/domain/payroll/UnitPrice.cs
@@ -1,10 +1,8 @@
-using System.Collections.Generic;
-
namespace presentation.windows.server.domain.payroll
{
public class UnitPrice
{
- double price;
+ readonly double price;
UnitPrice(double price)
{
@@ -16,19 +14,14 @@ namespace presentation.windows.server.domain.payroll
return new UnitPrice(raw);
}
- public IEnumerable<Unit> purchase_units(Money amount)
- {
- for (var i = 0; i < number_of_units(amount); i++) yield return Unit.New(this);
- }
-
- double number_of_units(Money amount)
+ public Units purchase_units(Money amount)
{
- return amount.value/price;
+ return amount.at_price(price);
}
- public Money to_money()
+ public virtual Money total_value_of(Units units)
{
- return price;
+ return units.value_at(price);
}
}
} \ No newline at end of file