RosettaCodeData/Task/Fibonacci-sequence/PARI-GP/fibonacci-sequence-16.parigp

8 lines
117 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
matantihadamard(n)={
matrix(n,n,i,j,
my(t=j-i+1);
if(t<1,t%2,t<3)
);
}
fib(n)=matdet(matantihadamard(n))