Extracting, "Curves2d.Bezier.Linear.pnt", from: "ocaml-ageom.git".

Files:

• IntAGeom_linear.mli
• IntAGeom_linear.ml

Testing. In the top-level:

$ ocamlc -i IntAGeom_linear.ml > IntAGeom_linear.mli
$ ocamlc -c IntAGeom_linear.mli
$ ocamlc -c IntAGeom_linear.ml
$ \ocaml -I . IntAGeom_linear.cmo
OCaml version 4.14.1

# open IntAGeom_linear ;;

# Curves2d.Bezier.Linear.pnt ;;
- : (int * int) * (int * int) -> int -> int * int = 

# Curves2d.Bezier.Linear.pnt ((0, 0), (100, 20)) ;;
- : int -> int * int = <fun>

# IntAGeom_linear.interval ;;
- : int * int = (0, 1000)

# Curves2d.Bezier.Linear.pnt ((0, 0), (100, 20)) 120 ;;
- : int * int = (12, 2)

# Curves2d.Bezier.Linear.pnt ((0, 0), (100, 20)) 900 ;;
- : int * int = (90, 18)