theory Sigma+− imports Nominal2+− begin+− +− atom_decl name+ÃÆâ€ââ€ÃÆâ€â„¢ÃƒÆ’¢â‚¬Â¦Ãƒâ€šÃ‚¾ÃƒÆ’‚¢ÃƒÆ’ƒâ€šÃ‚¢Ãƒâ€¹Ã¢â‚¬Â ÃƒÂ¢Ã¢â€šÂ¬Ã¢â€žÂ¢ +− nominal_datatype obj =+− Var name+− | Obj smlst+âÃÃÃÃ¢â‚¬Â ÃƒÂ¢Ã¢â€šÂ¬Ã¢â€žÂ¢ÃƒÆ’ƒÂ¢Ã¢â€šÂ¬Ã‚ ÃƒÂ¢Ã¢â€šÂ¬Ã¢â€žÂ¢ÃƒÆ’ƒâ€ Ã¢â‚¬â„¢ÃƒÆ’†â€™Ãƒâ€ Ã¢â‚¬â„¢ÃƒÆ’¢â‚¬Â¹ÃƒÂ¢Ã¢â€šÂ¬Ã‚ ÃƒÂ¢Ã¢â€šÂ¬Ã¢â€žÂ¢ | Inv obj string+− | Upd obj string method+− and smlst =+− SMNil+âÃâ€ÃâââÃÃâ€šÃ‚¢ÃƒÂ¢Ã¢â€šÂ¬Ã…¡Ã‚¬Ã…¡Ã‚¬Ã…¡Ãƒâ€šÃ‚¹ÃƒÆ’ƒÂ¢Ã¢â€šÂ¬Ã‚ ÃƒÂ¢Ã¢â€šÂ¬Ã¢â€žÂ¢ | SMCons string method smlst+− and method =+− Sig n::name o::obj binds n in o+− +âËââ‚ÃÃâ€ Ã¢â‚¬â„¢ÃƒÆ’†â€™Ãƒâ€ Ã¢â‚¬â„¢ÃƒÆ’¢â‚¬Å¡Ãƒâ€šÃ‚¬ÃƒÆ’‚ ÃƒÂ¢Ã¢â€šÂ¬Ã¢â€žÂ¢ +− end+− +−