X-Git-Url: http://git.hcoop.net/hcoop/portal.git/blobdiff_plain/208e2cbc6b64811eba6c762795022c042bc48e33..d46bc501d1e822483137e7c3a5c4a924b21629f6:/balance.sig

diff --git a/balance.sig b/balance.sig
index 9cd300a..7d47b90 100644
--- a/balance.sig
+++ b/balance.sig
@@ -1,14 +1,22 @@
 signature BALANCE =
 sig
-    type balance = {id :int, name : string, amount : real}
+    type balance = {id : int, name : string, amount : real}
 
     val addBalance : string -> int
     val lookupBalance : int -> balance
     val modBalance : balance -> unit
     val deleteBalance : int -> unit
     val listBalances : unit -> balance list
+    val listOwnedBalances : unit -> balance list
+    val listUnownedBalances : unit -> balance list
     val listBalanceUsers : int -> Init.user list
+    val listNegativeOwnedBalances : unit -> balance list
 
     val validBalanceName : string -> bool
     val balanceNameToId : string -> int option
-end
\ No newline at end of file
+
+    val sumOwnedBalances : unit -> real
+    val isNegative : balance -> bool
+
+    val depositAmount : int -> real
+end