fact: Definition to_word_as_CSetoid_fun:= (Build_CSetoid_fun nat_as_CSetoid (free_csetoid_as_csetoid A) to_word_ to_word_strext).
imports: Lia CoRN.algebra.CMonoids CoRN.model.monoids.Nmonoid CoRN.model.setoids.Nfinsetoid