kam := proc(c) # c=10^{6} (c^2*x^2-3)^2+c^2*x^9; end: