For.LFunctions
include Preface_specs.Bounded_join_semilattice.WITH_BOTTOM with type t := tval bottom : tThe bottom value represent the least element of the join semilattice
module Infix : Preface_specs.Bounded_join_semilattice.INFIX with type t := t