module type S1 =sig..end
type 'a t
val blit : ('a t, 'a t) Blit_intf.blitval blito : ('a t, 'a t) Blit_intf.blitoval unsafe_blit : ('a t, 'a t) Blit_intf.blitval sub : ('a t, 'a t) Blit_intf.subval subo : ('a t, 'a t) Blit_intf.subo