\def{text dessin=\dessin
text  black, -1.350+0.05,2,  medium,T
text  black, -2.650+0.05,2,  medium,K
text  black, -0.030+0.05,2,  medium,C
text  black, -1.250+0.05,2,  medium,R
text  black, -2.100+0.05,2,  medium,S
text  black,-0.35+0.05,2,  medium,A
arrow   -1.350,2,-1.350,0, 5,red
arrow   -2.600,2, -2.600,0, 5,red
arrow   -2.100,2, -2.100,0, 5,red
arrow   -0.030,2, -0.030,0, 5,red
arrow   -1.250,2,  -1.250,0,5,red
arrow   -2.1,2, -2.1,0,medium,5,red
arrow  -0.35,2,  -0.35,0,5,red
}
<p align="center">
\draw{600,50}
{xrange -\m-0.1,\n+0.5
yrange -2,2
hline black,0,0
arrow  2.5,0,3,0,10,black
parallel  -\m,-0.8,-\m,0.4,1/2,0, 40, blue
parallel  -\m,-0.3,-\m,0.3,1/10,0, 200, blue
parallel  -\m,-0.8,-\m,0.6,1,0, 40, red
\dessin
}</p>
