Functor Align.Make

module Make: 
functor (A : Basic) -> S  with type 'a t := 'a A.t

include Align.Basic

val align : 'a t -> 'b t -> ('a, 'b) These.t t

val falign : ('a -> 'a -> 'a) -> 'a t -> 'a t -> 'a t

val pad_zip_with : ('a option -> 'b option -> 'c) -> 'a t -> 'b t -> 'c t

val pad_zip : 'a t -> 'b t -> ('a option * 'b option) t