> solve(x^12+1=0,x);

- 1 2 ⁢ 2 + 1 2 ⁢ ⅈ ⁢ 2 , 1 2 ⁢ 2 - 1 2 ⁢ ⅈ ⁢ 2 , - 1 2 ⁢ 2 - 1 2 ⁢ ⅈ ⁢ 2 , 1 2 ⁢ 2 + 1 2 ⁢ ⅈ ⁢ 2 , - 1 2 ⁢ - 2 ⁢ 2 + 2 ⁢ ⅈ ⁢ 3 , 1 2 ⁢ - 2 ⁢ 2 + 2 ⁢ ⅈ ⁢ 3 , - 1 2 ⁢ 2 ⁢ 2 + 2 ⁢ ⅈ ⁢ 3 4 , 1 2 ⁢ 2 ⁢ 2 + 2 ⁢ ⅈ ⁢ 3 4 , - 1 2 ⁢ - 2 ⁢ 2 - 2 ⁢ ⅈ ⁢ 3 , 1 2 ⁢ - 2 ⁢ 2 - 2 ⁢ ⅈ ⁢ 3 , - 1 2 ⁢ 2 ⁢ 2 - 2 ⁢ ⅈ ⁢ 3 4 , 1 2 ⁢ 2 ⁢ 2 - 2 ⁢ ⅈ ⁢ 3 4

> z(x,y):=abs((x+y*I)^12+1);

z ⁡ x y := x + ⅈ ⁢ y 12 + 1

> plot3d(z(x,y),x=-1..1,y=-1..1, axes=boxed,view=[-1..1,-1..1,0..1],numpoints=2048);

[Plot]

> plot3d(z(x,y),x=-1..1,y=-1..1, axes=boxed,numpoints=2048);

[Plot]

>