File: lattice.rules

package info (click to toggle)
ladr 0.0.200902a-2
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 11,400 kB
  • ctags: 7,168
  • sloc: ansic: 59,953; perl: 1,006; python: 620; makefile: 403; sh: 86; csh: 58; modula3: 13
file content (11 lines) | stat: -rw-r--r-- 243 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
 
op(400, infix, ^).
op(400, infix, v).
assoc_comm(^).       % meet is associative and commutative
assoc_comm(v).       % join is associative and commutative

clauses(theory).
x ^ x = x.
x ^ (x v y) = x.
x v x = x.
x v (x ^ y) = x.
end_of_list.