Newer
Older
Import / research / reflection / examples / fibonacci1.kai
@John John on 29 Dec 2020 626 bytes bulk import from macbookpro checkouts

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

}