Changeset 12720
- Timestamp:
- 26.10.2009 12:09:40 (4 weeks ago)
- Files:
-
- 1 modified
-
trunk/Comorphisms/CASL2PCFOL.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Comorphisms/CASL2PCFOL.hs
r12719 r12720 146 146 mkProjName = mkAxName "projection" 147 147 148 -- | create a nexistential equation over x of sort s148 -- | create a quantified existential equation over x of sort s 149 149 mkXExEq :: SORT -> (TERM () -> TERM ()) -> (TERM () -> TERM ()) -> FORMULA () 150 150 mkXExEq s fl fr = let