list_compare : ('a * 'a -> order) -> 'a list * 'a list -> order
- list_compare Int.compare ([1,2,3,4], [1,2,3,4]); > val it = EQUAL : order - list_compare Int.compare ([1,2,3,4], [1,2,3,4,5]); > val it = LESS : order - list_compare Int.compare ([1,2,3,4], [1,2,3,2]); > val it = GREATER : order