X-Git-Url: http://git.hcoop.net/hcoop/portal.git/blobdiff_plain/b340786b13dacb1070c79713ebc4eaf298d27943..daaa0de7fc21561fd324cbc93fc99d69646b537f:/util.sig diff --git a/util.sig b/util.sig index 2c134b8..f8c38d4 100644 --- a/util.sig +++ b/util.sig @@ -1,5 +1,7 @@ signature UTIL = sig + val init : unit -> unit + datatype 'a flat_element = BEGIN | END @@ -12,4 +14,28 @@ sig val id : 'a -> 'a val makeSet : ('a -> string) -> 'a list -> string val neg : real -> real -end \ No newline at end of file + val add : real * real -> real + val sub : real * real -> real + val mult : int * real -> real + + val lt : real * real -> bool + val ge : real * real -> bool + + val validHost : string -> bool + val validDomain : string -> bool + val validEmail : string -> bool + val whoisUrl : string -> string + + val randomPassword : unit -> string + + val domainDir : string -> string + + val readFile : string -> string + + val mem : ''a * ''a list -> bool + + val allLower : string -> string + val normEmail : string -> string + + val diffFromNow : Time.time -> string +end