structure I = struct type t = int val toString = show _ val fromString = read _ end structure S = struct type t = string val toString = show _ val fromString = read _ end structure IL = ListFun.Make(I) structure SL = ListFun.Make(S) fun main () = return Pick your poison:
  • Integers
  • Strings