Mostly show sqrt 2 is irrational (#53)

This commit is contained in:
Patrick Stevens
2019-10-22 20:56:58 +01:00
committed by GitHub
parent 6eaa181104
commit f5f4cf1376
8 changed files with 244 additions and 37 deletions

View File

@@ -33,6 +33,9 @@ a *Q b = fieldOfFractionsTimes IntDom a b
0Q :
0Q = Ring.0R Ring
injectionQ :
injectionQ z = z ,, (nonneg 1 , λ ())
Field : Field Ring
Field = fieldOfFractions IntDom