Navigation Menu

Skip to content

Commit

Permalink
updated comments in Ordered Geometry Hierarchies with single quotes
Browse files Browse the repository at this point in the history
  • Loading branch information
carmenchui committed Jun 20, 2018
1 parent 0e638aa commit 3c7d314
Show file tree
Hide file tree
Showing 9 changed files with 52 additions and 52 deletions.
22 changes: 11 additions & 11 deletions ontologies/ordered_geometry/plane_order.clif
Expand Up @@ -2,17 +2,17 @@


(cl-imports http://colore.oor.net/bipartite_incidence/hilbert_incidence.clif) (cl-imports http://colore.oor.net/bipartite_incidence/hilbert_incidence.clif)


(cl-comment "If a point p2 is between points p1 and p3, then p2 is also (cl-comment 'If a point p2 is between points p1 and p3, then p2 is also
between p3 and p1, and there exists a line containing the points.") between p3 and p1, and there exists a line containing the points.')
(forall (p1 p2 p3) (forall (p1 p2 p3)
(if (and (point p1) (if (and (point p1)
(point p2) (point p2)
(point p3) (point p3)
(between p1 p2 p3)) (between p1 p2 p3))
(between p3 p2 p1))) (between p3 p2 p1)))


(cl-comment "If a point p2 is between points p1 and p3, then (cl-comment 'If a point p2 is between points p1 and p3, then
there exists a line containing the points.") there exists a line containing the points.')
(forall (p1 p2 p3) (forall (p1 p2 p3)
(if (and (point p1) (if (and (point p1)
(point p2) (point p2)
Expand All @@ -24,8 +24,8 @@ there exists a line containing the points.")
(in p2 l) (in p2 l)
(in p3 l))))) (in p3 l)))))


(cl-comment "If p1 and p3 are two points of a straight line, (cl-comment 'If p1 and p3 are two points of a straight line,
then there exists at least one point p2 lying between p1 and p3.") then there exists at least one point p2 lying between p1 and p3.')
(forall (p1 p3 l) (forall (p1 p3 l)
(if (and (point p1) (if (and (point p1)
(point p3) (point p3)
Expand All @@ -36,8 +36,8 @@ then there exists at least one point p2 lying between p1 and p3.")
(and (point p2) (and (point p2)
(between p1 p2 p3))))) (between p1 p2 p3)))))


(cl-comment "Of any three points situated on a straight line, (cl-comment 'Of any three points situated on a straight line,
there is always one which lies between the other two.") there is always one which lies between the other two.')


(forall (p1 p2 p3 l) (forall (p1 p2 p3 l)
(if (and (point p1) (if (and (point p1)
Expand All @@ -51,8 +51,8 @@ there is always one which lies between the other two.")
(between p2 p1 p3) (between p2 p1 p3)
(between p1 p3 p2)))) (between p1 p3 p2))))


(cl-comment "Of any three points situated on a straight line, (cl-comment 'Of any three points situated on a straight line,
there is only one which lies between the other two.") there is only one which lies between the other two.')


(forall (p1 p2 p3 l) (forall (p1 p2 p3 l)
(if (and (point p1) (if (and (point p1)
Expand All @@ -62,7 +62,7 @@ there is only one which lies between the other two.")
(between p1 p2 p3)) (between p1 p2 p3))
(not (between p1 p3 p2)))) (not (between p1 p3 p2))))


(cl-comment "Paschs Axiom:Let A, B, C be three points not lying in the same straight line and let a be a straight line lying in the plane ABC and not passing through any of the points A, B, C. Then, if the straight line a passes through a point of the segment AB, it will also pass through either a point of the segment BC or a point of the segment AC.") (cl-comment 'Paschs Axiom:Let A, B, C be three points not lying in the same straight line and let a be a straight line lying in the plane ABC and not passing through any of the points A, B, C. Then, if the straight line a passes through a point of the segment AB, it will also pass through either a point of the segment BC or a point of the segment AC.')
(forall (p1 p2 p3 p4 l1) (forall (p1 p2 p3 p4 l1)
(if (and (point p1) (if (and (point p1)
(point p2) (point p2)
Expand Down
12 changes: 6 additions & 6 deletions ontologies/ordered_incidence_geometry/b_2d.clif
Expand Up @@ -10,9 +10,9 @@


(cl-text http://colore.oor.net/ordered_incidence_geometry/b_2d (cl-text http://colore.oor.net/ordered_incidence_geometry/b_2d


(cl-comment "basic axioms of betweenness in 2D incidence geometry") (cl-comment 'basic axioms of betweenness in 2D incidence geometry')


(cl-comment "incidence") (cl-comment 'incidence')


(forall (x y) (forall (x y)
(if (if
Expand All @@ -25,7 +25,7 @@
) )




(cl-comment "B1: outer symmetry") (cl-comment 'B1: outer symmetry')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -35,7 +35,7 @@
) )




(cl-comment "B2: strict, i.e. acyclic") (cl-comment 'B2: strict, i.e. acyclic')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -44,7 +44,7 @@
) )
) )


(cl-comment "B3: linear coherence") (cl-comment 'B3: linear coherence')


(forall (a b c p) (forall (a b c p)
(iff (iff
Expand All @@ -69,7 +69,7 @@
) )




(cl-comment "B4: Separation") (cl-comment 'B4: Separation')


(forall (a b c p l) (forall (a b c p l)
(if (if
Expand Down
16 changes: 8 additions & 8 deletions ontologies/ordered_incidence_geometry/b_3d.clif
Expand Up @@ -10,12 +10,12 @@


(cl-text http://colore.oor.net/ordered_incidence_geometry/b_3d (cl-text http://colore.oor.net/ordered_incidence_geometry/b_3d


(cl-comment "basic axioms of betweenness in 3D incidence geometry") (cl-comment 'basic axioms of betweenness in 3D incidence geometry')


(cl-comment "sets of points, lines, and planes") (cl-comment 'sets of points, lines, and planes')




(cl-comment "I.0b") (cl-comment 'I.0b')


(forall (x) (forall (x)
(if (if
Expand Down Expand Up @@ -48,7 +48,7 @@
) )




(cl-comment "I.0c") (cl-comment 'I.0c')


(forall (x y) (forall (x y)
(if (if
Expand All @@ -61,7 +61,7 @@
) )




(cl-comment "O.1: outer symmetry") (cl-comment 'O.1: outer symmetry')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -71,7 +71,7 @@
) )




(cl-comment "O.2: strict, i.e. acyclic") (cl-comment 'O.2: strict, i.e. acyclic')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -80,7 +80,7 @@
) )
) )


(cl-comment "O.3: linear coherence") (cl-comment 'O.3: linear coherence')


(forall (a b c p) (forall (a b c p)
(iff (iff
Expand All @@ -106,7 +106,7 @@
) )




(cl-comment "B4: Separation") (cl-comment 'B4: Separation')


(forall (a b c p l) (forall (a b c p l)
(if (if
Expand Down
Expand Up @@ -13,7 +13,7 @@
(cl-imports http://colore.oor.net/ordered_incidence_geometry/b_2d) (cl-imports http://colore.oor.net/ordered_incidence_geometry/b_2d)




(cl-comment "separation property") (cl-comment 'separation property')


(forall (a b c x) (forall (a b c x)
(if (if
Expand All @@ -26,7 +26,7 @@
) )




(cl-comment "no more than one of three distinct elements is in the middle position") (cl-comment 'no more than one of three distinct elements is in the middle position')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -39,7 +39,7 @@
) )




(cl-comment "4") (cl-comment '4')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -56,7 +56,7 @@
) )




(cl-comment "6") (cl-comment '6')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -73,7 +73,7 @@
) )




(cl-comment "outer transitivity") (cl-comment 'outer transitivity')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -86,7 +86,7 @@
) )




(cl-comment "inner transitivity") (cl-comment 'inner transitivity')


(forall (a b x y) (forall (a b x y)
(if (if
Expand Down
Expand Up @@ -13,7 +13,7 @@
(cl-imports http://colore.oor.net/ordered_incidence_geometry/b_3d) (cl-imports http://colore.oor.net/ordered_incidence_geometry/b_3d)




(cl-comment "separation property") (cl-comment 'separation property')


(forall (a b c x) (forall (a b c x)
(if (if
Expand All @@ -26,7 +26,7 @@
) )




(cl-comment "no more than one of three distinct elements is in the middle position") (cl-comment 'no more than one of three distinct elements is in the middle position')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -39,7 +39,7 @@
) )




(cl-comment "4") (cl-comment '4')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -56,7 +56,7 @@
) )




(cl-comment "6") (cl-comment '6')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -73,7 +73,7 @@
) )




(cl-comment "outer transitivity") (cl-comment 'outer transitivity')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -86,7 +86,7 @@
) )




(cl-comment "inner transitivity") (cl-comment 'inner transitivity')


(forall (a b x y) (forall (a b x y)
(if (if
Expand Down
Expand Up @@ -33,7 +33,7 @@
) )
) )


(cl-comment "separation property") (cl-comment 'separation property')


(forall (a b c x) (forall (a b c x)
(if (if
Expand All @@ -46,7 +46,7 @@
) )




(cl-comment "no more than one of three distinct elements is in the middle position") (cl-comment 'no more than one of three distinct elements is in the middle position')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -59,7 +59,7 @@
) )




(cl-comment "4") (cl-comment '4')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -76,7 +76,7 @@
) )




(cl-comment "6") (cl-comment '6')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -93,7 +93,7 @@
) )




(cl-comment "outer transitivity") (cl-comment 'outer transitivity')


(forall (a b x y) (forall (a b x y)
(if (if
Expand All @@ -106,7 +106,7 @@
) )




(cl-comment "inner transitivity") (cl-comment 'inner transitivity')


(forall (a b x y) (forall (a b x y)
(if (if
Expand Down
Expand Up @@ -13,7 +13,7 @@
(cl-imports http://colore.oor.net/ordered_incidence_geometry/woig) (cl-imports http://colore.oor.net/ordered_incidence_geometry/woig)




(cl-comment "O.7: outer transitivity") (cl-comment 'O.7: outer transitivity')


(forall (a b x y l) (forall (a b x y l)
(if (if
Expand All @@ -31,7 +31,7 @@
) )




(cl-comment "O.8: inner transitivity") (cl-comment 'O.8: inner transitivity')


(forall (a b x y l) (forall (a b x y l)
(if (if
Expand All @@ -49,7 +49,7 @@
) )




(cl-comment "separation property") (cl-comment 'separation property')


(forall (a b c x l) (forall (a b c x l)
(if (if
Expand All @@ -67,7 +67,7 @@
) )




(cl-comment "no more than one of three distinct elements is in the middle position") (cl-comment 'no more than one of three distinct elements is in the middle position')


(forall (a b c) (forall (a b c)
(if (if
Expand All @@ -80,7 +80,7 @@
) )




(cl-comment "4") (cl-comment '4')


(forall (a b x y l) (forall (a b x y l)
(if (if
Expand All @@ -102,7 +102,7 @@
) )




(cl-comment "6") (cl-comment '6')


(forall (a b x y l) (forall (a b x y l)
(if (if
Expand Down

0 comments on commit 3c7d314

Please sign in to comment.