val type_check:
(BrgReduction.message -> 'a) -> (Brg.term -> Brg.entity -> 'a) ->
- Status.status -> Brg.entity -> 'a
+ Layer.status -> Brg.entity -> 'a
val validate:
(BrgReduction.message -> 'a) -> (unit -> 'a) ->
- Status.status -> Brg.entity -> 'a
+ Layer.status -> Brg.entity -> 'a