Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,16 +0,0 @@
|
|||
function Fib (X: in Integer) return Integer is
|
||||
function Actual_Fib (N: in Integer) return Integer is
|
||||
begin
|
||||
if N < 2 then
|
||||
return N;
|
||||
else
|
||||
return Actual_Fib (N-1) + Actual_Fib (N-2);
|
||||
end if;
|
||||
end Actual_Fib;
|
||||
begin
|
||||
if X < 0 then
|
||||
raise Constraint_Error;
|
||||
else
|
||||
return Actual_Fib (X);
|
||||
end if;
|
||||
end Fib;
|
||||
Loading…
Add table
Add a link
Reference in a new issue