Catenary

\setlength{\unitlength}{1.3cm}
\begin{picture}(4.3, 3.6)(-2, 0)
  \put(-2, 0){\vector(1, 0){4.4}}
  \put(2.45, -.05){$x$}
  \put(0, 0){\vector(0, 1){3.2}}
  \put(0, 3.35){\makebox(0, 0){$y$}}
  % qbezier P1=(0.0/0.0) m1=0.0 
  %         P2=(2.0/2.7622) m2=3.6269
  \qbezier(0.0, 0.0)(1.2384, 0.0)(2.0, 2.7622) 
  % qbezier P1=(0.0/0.0) m1=0.0 
  %         P2=(-2.0/2.7622) m2=-3.6269
  \qbezier(0.0, 0.0)(-1.2384, 0.0)(-2.0, 2.7622)
  \linethickness{.075mm}
  \multiput(-2, 0)(1, 0){5}{\line(0, 1){3}}
  \multiput(-2, 0)(0, 1){4}{\line(1, 0){4}}
  \color{red}
  \linethickness{.2mm}
  \put( .3, .12763){\line(1, 0){.4}}
  \put(.5, -.07237){\line(0, 1){.4}}
  \put(-.7, .12763){\line(1, 0){.4}}
  \put(-.5, -.07237){\line(0, 1){.4}}
  \put(.8,   .54308){\line(1, 0){.4}}
  \put(1,   .34308){\line(0, 1){.4}}
  \put(-1.2,  .54308){\line(1, 0){.4}}
  \put(-1,   .34308){\line(0, 1){.4}}
  \put(1.3,  1.35241){\line(1, 0){.4}}
  \put(1.5,  1.15241){\line(0, 1){.4}}
  \put(-1.7, 1.35241){\line(1, 0){.4}}
  \put(-1.5,  1.15241){\line(0, 1){.4}}
\end{picture}