6 lines
214 B
Ada
6 lines
214 B
Ada
generic
|
|
type Scalar is digits <>;
|
|
|
|
with function A (N : in Natural) return Natural;
|
|
with function B (N : in Positive) return Natural;
|
|
function Continued_Fraction_Ada95 (Steps : in Natural) return Scalar;
|