#!/usr/bin/octave -qf
% Copyright 2005 Daniel Cer (daniel.cer@cs.colorado.edu)
%
% This work is licensed under the Creative Commons Attribution-NonCommercial-
% ShareAlike License. To view a copy of this license, visit 
% http://creativecommons.org/licenses/by-nc-sa/2.5/ or send a letter to 
% Creative Commons, 543 Howard Street, 5th Floor, San Francisco, California, 
% 94105, USA.

function fib=fibonacci(n)
  if n <= 0, fib = -1;
  elseif n <= 2, fib = 1;
  else fib = fibonacci(n-1) + fibonacci(n-2);
  endif
endfunction

if nargin != 1,
  fprintf(stderr, 
    "Usage:\n\t%s (n-th fibonacci number to calculate)\n", program_name);
  exit(-1);
end

printf("fibonacci(%s): %d\n", argv{1}, fibonacci(str2num(argv{1})));