read AutoSquared: R:=7: K:=2000: EtzimLSs([x+1+1/x,1-x^2],x,2,R,K,A): quit: