I needed to add the word "average"\!
[hcoop/zz_old/portal.git] / balance.sig
index 9cd300a..2ce2b47 100644 (file)
@@ -7,8 +7,14 @@ sig
     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
+end