on master help sign in
Delete DecEq Float
commitf4554eb887cb6ad18cd2d22c8a15e95f10445067 authorDavid Raymond Christiansen <david@davidchristiansen.dk> dateThu 19 Mar 2015, 11:10 (12 years ago) parente6c5588
1 file changed−9
libs/prelude/Decidable/Equality.idr−9
libs/prelude/Decidable/Equality.idr−9
@@ -181,15 +181,6 @@ instance DecEq Integer where
181181 primitiveEq = believe_me (Refl {x})
182182 postulate primitiveNotEq : x = y -> Void
183183
184−--------------------------------------------------------------------------------
185−-- Float
186−--------------------------------------------------------------------------------
187−
188−instance DecEq Float where
189− decEq x y = if x == y then Yes primitiveEq else No primitiveNotEq
190− where primitiveEq : x = y
191− primitiveEq = believe_me (Refl {x})
192− postulate primitiveNotEq : x = y -> Void
193184
194185--------------------------------------------------------------------------------
195186-- String