# set terminal svg size 600,400 dynamic enhanced font 'arial,10' mousing name "hypertext_surface_1" butt dashlength 1.0 
# set output 'hypertext_surface.1.svg'
set format z "%.1f" 
set grid nopolar
set grid xtics nomxtics ytics nomytics ztics nomztics nortics nomrtics \
 nox2tics nomx2tics noy2tics nomy2tics nocbtics nomcbtics
set grid vertical layerdefault   lt 0 linecolor 0 linewidth 1.000,  lt 0 linecolor 0 linewidth 1.000
unset key
set label 1 "Surface shows abs(atanh(z))\nMouse-over reports Real and Imaginary components" at screen 0.08, 0.85, 0 left norotate back nopoint
set style textbox  opaque margins  2.0,  6.0 fc  bgnd noborder linewidth  1.0
set view 45, 20, 1, 0.8
set samples 41, 41
set isosamples 41, 41
set style data lines
set xyplane at 0
set xtics border in scale 1,0.5 mirror norotate  offset character 0, -0.5, 0 autojustify
set xtics  norangelimit 1 
set xtics add  ("0\nx" 0.00000)
set ytics border in scale 1,0.5 mirror norotate  offset character 0, -0.5, 0 autojustify
set ytics  norangelimit 1 
set ytics add  ("0\niy" 0.00000)
set title "Hyperbolic tangent of complex variable z = x + iy\n\n" 
set urange [ -1.57080 : 1.57080 ] noreverse nowriteback
set vrange [ -1.57080 : 1.57080 ] noreverse nowriteback
set xrange [ -1.57080 : 1.57080 ] noreverse nowriteback
set x2range [ * : * ] noreverse writeback
set yrange [ -1.57080 : 1.57080 ] noreverse nowriteback
set y2range [ * : * ] noreverse writeback
set zrange [ 0.00000 : 1.57080 ] noreverse nowriteback
set cbrange [ 0.00000 : 1.57080 ] noreverse nowriteback
set rrange [ * : * ] noreverse writeback
set bmargin at screen 0.03
set pm3d depthorder 
set pm3d interpolate 1,1 flush begin noftriangles border linewidth 0.250 dashtype solid corners2color mean
set pm3d lighting primary 0.5 specular 0.2 spec2 0.4
set pm3d spotlight rgb 0xff0044 rot_x 50 rot_z 90 Phong 4.0
set palette defined ( 0 0 0 0.5451, 0.5 1 0.8431 0, 1 0.5451 0 0 )
set colorbox vertical origin screen 0.9, 0.2 size screen 0.05, 0.6 front  noinvert bdefault
unset colorbox
F(x,y) = atanh(x + I*y)
surf(x,y) = abs(F(x,y))
text(x,y) = imag(F(x,y)) < 0          ? sprintf(" %.2f - %.2f i ", real(F(x,y)), -imag(F(x,y)))          : sprintf(" %.2f + %.2f i ", real(F(x,y)), imag(F(x,y)))
NO_ANIMATION = 1
save_encoding = "utf8"
## Last datafile plotted: "++"
splot surf(x,y) with pm3d title "abs(atanh(z))",       '++' using 1:2:(surf(x,y)):(text(x,y)) with labels hypertext font ":Italic"            point lc rgb "0xff000000" pt 5 ps 2 notitle