Logica Tools
for
Thought
 
Fitch
Undo Copy Paste Help
Objects: a, b, c
Functions: f, g
Goal  Incomplete


































1 rev(a)=a Premise 2 rev(b)=b Premise 3 AX:AY:rev(cons(X,Y))=cons(rev(Y),rev(X)) Premise 4 rev(rev(a))=a Equality Elimination 1 1 5 rev(rev(b))=b Equality Elimination 2 2 6 rev(rev(c))=c & rev(rev(d))=d Assumption 7 rev(rev(cons(c,d)))=rev(rev(cons(c,d))) Equality Introduction 8 AY:rev(cons(c,Y))=cons(rev(Y),rev(c)) Universal Elimination 3 9 rev(cons(c,d))=cons(rev(d),rev(c)) Universal Elimination 8 10 rev(rev(cons(c,d)))=rev(cons(rev(d),rev(c))) Equality Elimination 7 9 11 AY:rev(cons(rev(d),Y))=cons(rev(Y),rev(rev(d))) Universal Elimination 3 12 rev(cons(rev(d),rev(c)))=cons(rev(rev(c)),rev(rev(d))) Universal Elimination 11 13 rev(rev(cons(c,d)))=cons(rev(rev(c)),rev(rev(d))) Equality Elimination 12 10 14 rev(rev(c))=c And Elimination 6 15 rev(rev(d))=d And Elimination 6 16 rev(rev(cons(c,d)))=cons(c,rev(rev(d))) Equality Elimination 13 14 17 rev(rev(cons(c,d)))=cons(c,d) Equality Elimination 16 15 18 rev(rev(c))=c & rev(rev(d))=d => rev(rev(cons(c,d)))=cons(c,d) Implication Introduction 6 17 19 AY:(rev(rev(c))=c & rev(rev(Y))=Y => rev(rev(cons(c,Y)))=cons(c,Y)) Universal Introduction 18 20 AX:AY:(rev(rev(X))=X & rev(rev(Y))=Y => rev(rev(cons(X,Y)))=cons(X,Y)) Universal Introduction 19 21 AX:rev(rev(X))=X Induction 4 5 20