WOLFRAM SYSTEM MODELER
Geometry figure for straight pipe
SystemModel["Modelica.Fluid.Dissipation.Utilities.Icons.PressureLoss.StraightPipe_d"]