sig   class type scheme =     object       method pad : string -> int -> unit       method strip : string -> int     end   val length : Cryptokit.Padding.scheme   val _8000 : Cryptokit.Padding.scheme end