OFFSET
1,2
COMMENTS
Number of solutions modulo n of the equation system:
a^2 - b^2 + c^2 + d^2 = 1
2ab = 0
2ac = 0
2ad = 0.
MATHEMATICA
invo11[n_] := Length@Reduce[a^2 - b^2 + c^2 + d^2 ==1 && 2 a b== 0 && 2 a c == 0 && 2 a d == 0, Modulus -> n]; Table[invo11[n], {n, 1, 44}]
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
José María Grau Ribas, Jan 28 2014
STATUS
approved