let
yOrd_init (() : unit) : unit = yOrd:=((!ymax)-. (!yMarge) -. (!yDelta))