14 lines
484 B
Text
14 lines
484 B
Text
instance : DecidableEq ByteArray
|
|
| ⟨a⟩, ⟨b⟩ => match decEq a b with
|
|
| isTrue h₁ => isTrue $ congrArg ByteArray.mk h₁
|
|
| isFalse h₂ => isFalse $ fun h => by cases h; cases (h₂ rfl)
|
|
|
|
#eval ByteArray.empty = ByteArray.empty
|
|
#eval ByteArray.empty != ByteArray.empty.push 5
|
|
|
|
instance : BEq FloatArray where
|
|
beq a b := match a, b with
|
|
| ⟨a⟩, ⟨b⟩ => a == b
|
|
|
|
#eval FloatArray.empty == FloatArray.empty
|
|
#eval FloatArray.empty != FloatArray.empty.push 5
|