45 lines
946 B
Plaintext
45 lines
946 B
Plaintext
note
|
|
description: "Objects that ..."
|
|
author: "Colin LeMahieu"
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
quote: "The urge to save humanity is almost always a false front for the urge to rule. - H.L. Mencken"
|
|
|
|
deferred class
|
|
EC_DOMAIN_PARAMETERS
|
|
|
|
inherit
|
|
EC_CONSTANTS
|
|
DEBUG_OUTPUT
|
|
|
|
feature
|
|
curve: EC_CURVE
|
|
g: EC_POINT
|
|
n: INTEGER_X
|
|
h: INTEGER_X
|
|
|
|
make_curve_g_n (curve_new: like curve g_new: like g n_new: INTEGER_X)
|
|
-- Construct this domain with no seed and h= 1
|
|
do
|
|
curve := curve_new
|
|
g := g_new
|
|
n := n_new
|
|
h := ONE
|
|
end
|
|
|
|
make_curve_g_n_h (curve_new: like curve g_new: like g n_new: INTEGER_X h_new: INTEGER_X)
|
|
-- construct this domain with no seed
|
|
do
|
|
curve := curve_new
|
|
g := g_new
|
|
n := n_new
|
|
h := h_new
|
|
end
|
|
|
|
feature {DEBUG_OUTPUT} -- {DEBUG_OUTPUT}
|
|
debug_output: STRING
|
|
do
|
|
result := "Curve: " + curve.debug_output + "%Ng: " + g.debug_output + "%Nn: " + n.out_hex + "%Nh: " + h.out_hex
|
|
end
|
|
end
|