OFFSET
1,6
PROG
(PARI) m=74; v=vector(m); for(a=1, m, for(b=1, m, for(c=1, m, for(d=1, m, n=a+b+c+d; if(n<=m, if(1-a/c==(1-b/d)^2, v[n]++)))))); v
CROSSREFS
KEYWORD
nonn
AUTHOR
Hugo Pfoertner and Rainer Rosenthal Oct 10 2018
STATUS
approved