Canonical Structure UA_FM_diese :=
   Build_MonMor UA_FM_diese_unit_law UA_FM_diese_op_law.

(* Specifications: *)
Lemma UA_FM_law1 : UA_law1 UA_FM_mor UA_FM_diese.
Lemma UA_FM_law2 : UA_law2 UA_FM_mor UA_FM_diese.
Lemma IsUA_FM : IsUA UA_FM_mor.