Input.ExtensionalBlock
type input = Archive_lib.Extensional.Block.t
val arg_typ : ( Archive_lib.Extensional.Block.t option, input option ) Schema.Arg.arg_typ