sig
  type pointf = CL_Pointf.t
  external point_right_of_line :
    a:CL_LineMath.pointf ->
    b:CL_LineMath.pointf -> p:CL_LineMath.pointf -> float
    = "caml_CL_LineMath_point_right_of_line" [@@noalloc]
  external midpoint :
    a:CL_LineMath.pointf -> b:CL_LineMath.pointf -> CL_LineMath.pointf
    = "caml_CL_LineMath_midpoint" [@@noalloc]
  external closest_point :
    p:CL_LineMath.pointf ->
    a:CL_LineMath.pointf -> b:CL_LineMath.pointf -> CL_LineMath.pointf
    = "caml_CL_LineMath_closest_point" [@@noalloc]
  external closest_point_relative :
    p:CL_LineMath.pointf ->
    a:CL_LineMath.pointf -> b:CL_LineMath.pointf -> float
    = "caml_CL_LineMath_closest_point_relative" [@@noalloc]
end