model Gearbox "Icon of a gear box"
annotation (
Icon(
coordinateSystem(
extent = {
{-100, -100},
{100, 100}},
preserveAspectRatio = true),
graphics = {
Rectangle(
lineColor = {64, 64, 64},
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
extent = {
{-100, -10},
{100, 10}}),
Polygon(
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
points = {
{-60, 10},
{-60, 20},
{-40, 40},
{-40, -40},
{-60, -20},
{-60, 10}}),
Rectangle(
lineColor = {64, 64, 64},
fillColor = {255, 255, 255},
fillPattern = FillPattern.HorizontalCylinder,
extent = {
{-40, -60},
{40, 60}},
radius = 10),
Rectangle(
lineColor = {64, 64, 64},
extent = {
{-40, -60},
{40, 60}},
radius = 10),
Polygon(
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
points = {
{60, 20},
{40, 40},
{40, -40},
{60, -20},
{60, 20}}),
Polygon(
fillColor = {64, 64, 64},
fillPattern = FillPattern.Solid,
points = {
{-60, -80},
{-50, -80},
{-20, -20},
{20, -20},
{48, -80},
{60, -80},
{60, -90},
{-60, -90},
{-60, -80}})}),
Documentation(info = "<html>\n<p>\nThis is the icon of a gear box from the rotational package.\n</p>\n</html>"));
end Gearbox;