Fold dues increase into portal

[bpt/portal.git] / balance.sml

diff --git a/balance.sml b/balance.sml
index ffefdd5..59622de 100644 (file)
--- a/balance.sml
+++ b/balance.sml
@@ -108,7 +108,7 @@ fun sumOwnedBalances () =
 
 fun isNegative (bal : balance) = #amount bal < 0.0
 
-fun depositAmount _ = 5.0 * 3.0
+fun depositAmount _ = 7.0 * 3.0
 (*fun depositAmount bal =
     let
        val db = getDb ()