module fibonacci1
{
information
{
description := "Fibonacci";
version := "1.00";
copyright := "Copyright (C) 2019";
author := "John Ryland";
checksum := "_";
}
imports // includes ?
{
}
interface // exports ?
{
function fibonacci(int32 num) => int32;
}
implementation
{
function fibonacci(int32 num) => int32
{
int32 next := 0;
uint32 t1 := 0;
uint32 t2 := 1;
for (int32 i := 0; i < (num - 1); i++)
{
next := t1 + t2;
t1 := t2;
t2 := next;
}
return next;
}
}
tests
}