remove arithmetic on Curve25519. it's mathematically not possible

This commit is contained in:
Vincent Hanquez 2016-12-01 12:53:56 +00:00
parent 55f385a136
commit f37d0b79ec

View File

@ -209,10 +209,6 @@ instance EllipticCurve Curve_X25519 where
encodePoint (X25519Point p) = B.convert p
decodePoint bs = X25519Point <$> X25519.publicKey bs
instance EllipticCurveArith Curve_X25519 where
pointAdd = undefined
pointSmul = undefined
instance EllipticCurveDH Curve_X25519 where
ecdh (X25519Scalar s) (X25519Point p) = SharedSecret $ convert secret
where