Bilateral Symmetry

Author

Eric W. Weisstein
August 14, 2026

This notebook downloaded from https://mathworld.wolfram.com/notebooks/PlaneGeometry/BilateralSymmetry.nb.

For more information, see Eric's MathWorld entry https://mathworld.wolfram.com/BilateralSymmetry.html.

©2026 Wolfram Research, Inc. except for portions noted otherwise

Illustration

Reflection in the dashed line l interchanges the two halves of the figure.

Module[{axisColor,neutral,outline},neutral=LightDarkSwitched[Black,White];axisColor=Blue;outline={{0,2},{-(3/5),(7/5)},{-(6/5),(4/5)},{-(4/5),(1/5)},{-(7/5),-(3/5)},{-(3/5),-(7/5)},{0,-(8/5)},{(3/5),-(7/5)},{(7/5),-(3/5)},{(4/5),(1/5)},{(6/5),(4/5)},{(3/5),(7/5)}};Graphics[{Directive[StandardGray,Opacity[0.2]],Polygon[outline],Directive[neutral,Opacity[1],AbsoluteThickness[2.5]],Line[Append[outline,First[outline]]],Directive[axisColor,AbsoluteThickness[2],Dashing[{0.025,0.018}]],Line[{{0,-2},{0,(12/5)}}],Text[Style[l,18,axisColor,FontFamily->"Times"],{0,(13/5)}]}]]