forked from GitHub/gf-core
changed names of resource-1.3; added a note on homepage on release
This commit is contained in:
47
old-examples/logic/Theory.gf
Normal file
47
old-examples/logic/Theory.gf
Normal file
@@ -0,0 +1,47 @@
|
||||
abstract Theory = {
|
||||
|
||||
cat
|
||||
Chapter ;
|
||||
Jment ;
|
||||
[Jment] {0} ;
|
||||
Decl ;
|
||||
[Decl] {0} ;
|
||||
Prop ;
|
||||
Proof ;
|
||||
[Proof] {2} ;
|
||||
Branch ;
|
||||
Typ ;
|
||||
Obj ;
|
||||
Label ;
|
||||
Ref ;
|
||||
[Ref] ;
|
||||
Adverb ;
|
||||
Number ;
|
||||
|
||||
fun
|
||||
Chap : Label -> [Jment] -> Chapter ; -- title, text
|
||||
|
||||
JDefObj : [Decl] -> Obj -> Obj -> Jment ; -- a = b (G)
|
||||
JDefObjTyp : [Decl] -> Typ -> Obj -> Obj -> Jment ; -- a = b : A (G)
|
||||
JDefProp : [Decl] -> Prop -> Prop -> Jment ; -- A = B : Prop (G)
|
||||
JThm : [Decl] -> Prop -> Proof -> Jment ; -- p : P (G)
|
||||
|
||||
DProp : Prop -> Decl ; -- assume P
|
||||
DPropLabel : Label -> Prop -> Label ; -- assume P (h)
|
||||
DTyp : Obj -> Typ -> Decl ; -- let x,y be T
|
||||
|
||||
PProp : Prop -> Proof ; -- P.
|
||||
PAdvProp : Adverb -> Prop -> Proof ; -- Hence, P.
|
||||
PDecl : Decl -> Proof ; -- Assume P.
|
||||
PBranch : Branch -> [Proof] -> Proof ; -- By cases: P1 P2
|
||||
|
||||
BCases : Number -> Branch ; -- We have n cases.
|
||||
|
||||
ARef : Ref -> Adverb ; -- by Thm 2
|
||||
AHence : Adverb ; -- therefore
|
||||
AAFort : Adverb ; -- a fortiori
|
||||
|
||||
RLabel : Label -> Ref ; -- Thm 2
|
||||
RMany : [Ref] -> Ref ; -- Thm 2 and Lemma 4
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user