ReliefPlot Examples

With[{z=x+I y},ReliefPlot[Table[Cos[64#],
{x,##2},{y,##2}]&[If[Abs[z]>1.1 ,
0,#]&@Arg[Sum[(z(z^9+.01))^k!,
{k,4}]],-1.11,1.11,.005],
ImageSize->500,ColorFunction->"CoffeeTones"]]