OFFSET
1,1
MAPLE
f:=proc(n) option remember; local r; r:=1;
if n <= 2 then 1 else r*(f(ceil(n/2))-f(floor(n/2))); fi; end;
CROSSREFS
KEYWORD
sign
AUTHOR
N. J. A. Sloane, May 13 2011, based on a posting by Benoit CLOITRE to the Sequence Fans Mailing List, Apr 29 2011
STATUS
approved