Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
c172ArmsPOH ::
C172Arms MeasuredArm
c172ArmsPOH =
C172Arms
(rangeMeasuredArm (37 ^. inches) (34 ^. inches .->. 46 ^. inches)) -- front seat
(staticMeasuredArm (48 ^. inches)) -- fuel
(staticMeasuredArm (73 ^. inches)) -- rear seat
(rangeMeasuredArm (95 ^. inches) (82 ^. inches .->. 108 ^. inches)) -- baggage A
(rangeMeasuredArm (123 ^. inches) (108 ^. inches .->. 142 ^. inches)) -- baggage B
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment