(* char-lin-ord.sml *)

(* Copyright (C) 2006 Alley Stoughton

   This file is part of crypto, a cryptogram encoder/decoder.  See the
   file COPYING.txt for copying and usage restrictions *)

(* linear ordering structure based on type char *)

structure CharLinOrd :> LIN_ORD where type elem = char =
struct

type elem = char

val compare = Char.compare

end;