\documentclass[12pt]{article}
\begin{document}
\input fig4tex
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% 1. Definition des points caracteristiques de la geometrie
\figinit{1.2cm}
\figpt 0:$O$(0,0)\figpt 1:Re $z$(5,0)\figpt 2:(0,5)\figpt 4:(5,5)
%
\figptrot 3:=1/0,60/
\figvectP 11[0,1]\figvectP 13[0,3]\figptinterlines 5 :[2,11; 0,13]
%
\figptrot 6:=1/0,30/
\figvectP 12[0,2]\figvectP 16[0,6]\figptinterlines 7 :[1,12; 0,16]
%
\def\LUN{0.06}\def\LDE{0.12}% \LDE= 2*\LUN
\figpttra 21:=0/\LUN,16/\figptstra 22=21,22,23,24,25,26,27,28,29/\LDE,16/
\def\LTR{0.1}% \LTR < distance entre 2 points
%
\figptinterlines 31 :[1,12; 27,13]
\figptinterlines 32 :[1,12; 27,11]
%
\figpttraC 31:=31/0,-0.5/
\figptbary 41:[27,31; 2,1]\figptbary 42:[27,31; 1,2]
\figvectN 50[31,27]\figpttra 41:=41/0.1,50/\figpttra 42:=42/0.05,50/
\figptssym 61=41,42,31/0,27/
\figptBezier 65 :: 0.585 [27,61,62,63]
\figptBezier 66 :: 0.19334 [27,61,62,63]
\figptBezier 67 :: 0.38667 [27,61,62,63]
\figptscontrol 68 [27,66,67,65]
%
% 2. Creation du fichier graphique
\figdrawbegin{}
% Axes + droite
\figdrawarrow[0,1]\figdrawarrow[0,2]\figdrawline [0,5]
% Zones grises
\figset (fillmode=yes,color=0.8)\figdrawline [31,27,32]
\figdrawcirc 21(\LTR)\figdrawcirc 22(\LTR)\figdrawcirc 23(\LTR)\figdrawcirc 24(\LTR)
\figdrawcirc 25(\LTR)\figdrawcirc 26(\LTR)
% Zones blanches
\figset (color=1)
\figdrawBezier 1[27,41,42,31]\figdrawBezier 1[27,68,69,65]\figdrawline[27,32,65]
%
\figreset{general}
\figset (dash=3)\figdrawline [0,7]
\def\EPAIS{0.8}
\figset (dash=default, width=\EPAIS)
\figdrawBezier 1[27,41,42,31]\figdrawBezier 1[27,68,69,65]
%
\figreset{general}\figset (fillmode=yes,color=0.8)\figdrawcirc 27(\LTR)
%
\figreset{general}\figset (width=\EPAIS)\figdrawarccirc 27;\LTR(60,0)
\figdrawcirc 21(\LTR)\figdrawcirc 22(\LTR)\figdrawcirc 23(\LTR)\figdrawcirc 24(\LTR)
\figdrawcirc 25(\LTR)\figdrawcirc 26(\LTR)
\figdrawend
% 3. Inscription du texte sur le dessin
\figvisu{\figBoxA}{Example}{%
\figwrites 1:(4pt)
\figwritew 2:Im $z$(4pt)
\figwritesw 0:(4pt)
%
%\figshowpts[0,9]\figshowpts[21,30]
\figset write(mark=.)\figwritep[21,22,23,24,25,26,27,28,29,30]
%\figshowpts[31,32]
%\figshowpts[65,65]
}
\centerline{\box\figBoxA}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\end{document}