[P256] define pointMul

This commit is contained in:
Vincent Hanquez 2015-05-03 19:52:00 +01:00
parent 25c303602d
commit ea875e5c88

View File

@ -64,6 +64,11 @@ toPoint :: Scalar -> Point
toPoint s = withNewPoint $ \px py -> withScalar s $ \p ->
ccryptonite_p256_basepoint_mul p px py
pointMul :: Scalar -> Point -> Point
pointMul scalar p = withNewPoint $ \dx dy ->
withScalar scalar $ \n -> withPoint p $ \px py ->
ccryptonite_p256_point_mul n dx dy px py
------------------------------------------------------------------------
-- Scalar methods
------------------------------------------------------------------------