# Module Crypt_blowfish.Cryptmodes

    module Cryptmodes: Cryptmodes_64.T  with type key = Cryptsystem.key

    type key

CIPHER BLOCK CHAINING MODE

    val encrypt_cbc : key ->
           int * int * int * int -> string -> (int * int * int * int) * string

    val decrypt_cbc : key ->
           int * int * int * int -> string -> (int * int * int * int) * string

8 BIT CIPHER-FEEDBACK MODE

    val encrypt_cfb8 : key ->
           int * int * int * int -> string -> (int * int * int * int) * string

    val decrypt_cfb8 : key ->
           int * int * int * int -> string -> (int * int * int * int) * string

64 BIT CIPHER-FEEDBACK MODE

    val encrypt_cfb64 : key ->
           int * int * int * int ->
           int -> string -> (int * int * int * int) * int * string

    val decrypt_cfb64 : key ->
           int * int * int * int ->
           int -> string -> (int * int * int * int) * int * string

OUTPUT-FEEDBACK MODE (64 bit)

    val crypt_ofb : key ->
           int * int * int * int ->
           int -> string -> (int * int * int * int) * int * string