+
+ val dateString : unit -> string
+
+ val grandfatherUsers : unit -> unit
+
+ type node = {id : int, name : string, descr : string, debian : string}
+
+ val listNodes : unit -> node list
+ val nodeName : int -> string
+ val nodeDebian : int -> string
+
+ val explain : exn -> string
+ val tokens : unit -> string
+ val tokensForked : unit -> unit
+
+ val usersDiff : string list * string list ->
+ {onlyInFirst : string list, onlyInSecond : string list}
+ val listUsernames : unit -> string list
+ val usersInAfs : unit -> string list
+
+ val searchPaypal : string -> user list
+ val searchCheckout : string -> user list
+end