module R = Alpha
module B = Brg
+IFDEF MANAGER THEN
+
(* Internal functions *******************************************************)
let ok = ref true
out_clause och "module grundlagen.";
out_clause och "accumulate helena.";
output_entity_tj3 och, close_out_tj3 och
+
+END