function retval = fibonacci()
p=18/37;
q=1-p;
%   L   W   1   1   2   3   5   8  13  21  34  55  89
m = \
[ [ 1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0]; %  L
  [ 0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0]; %  W
  [ 0,  p,  0,  q,  0,  0,  0,  0,  0,  0,  0,  0,  0]; %  1
  [ 0,  0,  p,  0,  q,  0,  0,  0,  0,  0,  0,  0,  0]; %  1
  [ 0,  0,  p,  0,  0,  q,  0,  0,  0,  0,  0,  0,  0]; %  2
  [ 0,  0,  0,  p,  0,  0,  q,  0,  0,  0,  0,  0,  0]; %  3
  [ 0,  0,  0,  0,  p,  0,  0,  q,  0,  0,  0,  0,  0]; %  5
  [ 0,  0,  0,  0,  0,  p,  0,  0,  q,  0,  0,  0,  0]; %  8
  [ 0,  0,  0,  0,  0,  0,  p,  0,  0,  q,  0,  0,  0]; % 13
  [ 0,  0,  0,  0,  0,  0,  0,  p,  0,  0,  q,  0,  0]; % 21
  [ 0,  0,  0,  0,  0,  0,  0,  0,  p,  0,  0,  q,  0]; % 34
  [ 0,  0,  0,  0,  0,  0,  0,  0,  0,  p,  0,  0,  q]; % 55
  [ q,  0,  0,  0,  0,  0,  0,  0,  0,  0,  p,  0,  0]; % 89
];
result = m^1280;
retval = result(:,1:2);
endfunction
