\(Show[{\ 
        ParametricPlot[\ {\ {t, \ \(-1\)}, 
		\ {1, \ t}, \ {\ \(-\ 1\), 
              t}, 
		\ \ \ \ \ {t, \ Sqrt[Abs[t]]}}, \ {t, \(-1\), \ 
            1}, 
		\ \ \ AspectRatio -> \ 
            Automatic, 
	\ \ \ \ \ PlotRange -> {{\(-1.5\), \ 
                1.5}, \ {\(-1.5\), \ 
                1.5}}, 
	\ \ \ \ PlotStyle\  -> \ {Thickness[0.008], \ 
              Thickness[0.008], 
			\ Thickness[0.008], \ 
              Thickness[0.008]}\ ], 

        Graphics[
          Polygon[{\ {0.5, \ 
                Sqrt[0.5]}, \ {0.5, \ \ \ Sqrt[0.5] - \ 
                  0.3}, 
				{0.8, \ \ Sqrt[0.5] - \ 
                  0.3}, \ {0.8, \ \ Sqrt[0.5]}}]], 

        Graphics[
          Polygon[{\ {0.5, \ 
                Sqrt[0.5]}, \ {0.5, \ \ \ Sqrt[0.5] + \ 
                  0.3}, 
				{0.2, \ \ Sqrt[0.5] + \ 
                  0.3}, \ {0.2, \ \ Sqrt[0.5]}}]]}]\)