%I #6 Mar 31 2015 03:55:14
%S -1,1,-1,-1,0,0,1,-1,1,-1,-1,0,0,0,-1,0,-1,1,1,1,1,1,0,-1,0,-1,0,-1,1,
%T 1,0,-1,1,0,-1,1,-1,0,-1,0,0,0,-1,0,-1,1,0,-1,-1,1,-1,-1,1,1,1,1,0,0,
%U 0,0,0,-1,0,0,0,1,-1,-1,1,1,1,1,1,-1,0,-1,-1,-1,-1,0,1,0,1,0,0,0,-1,0,-1,0,1,1,-1,0,-1,0,0,1,0,0,0,1,0,1,-1
%N Moebius function (A008683) applied to each term in the triangle A055096.
%p sum2distinct_squares_array := (n) -> (((n-((trinv(n-1)*(trinv(n-1)-1))/2))^2)+((trinv(n-1)+1)^2));
%p with(numtheory,mobius); a(n) = mobius(sum2distinct_squares_array(n))
%Y Cf. A055097.
%K sign,tabl
%O 1,1
%A _Antti Karttunen_, Apr 04 2000