sig
  val given : user:string -> pass:string -> Restful.Auth.Cred.result -> bool
end