Quaternion type: Difference between revisions

Content deleted Content added
Line 587: Line 587:
=={{header|OCaml}}==
=={{header|OCaml}}==


The implementation as a file q.ml:
<lang ocaml>type quaternion = float * float * float * float
<lang ocaml>type quaternion = float * float * float * float


Line 637: Line 638:
(a/n2, b/n2, c/n2, d/n2)</lang>
(a/n2, b/n2, c/n2, d/n2)</lang>


the interface as a file q.mli:

<lang ocaml>type quaternion = float * float * float * float
<lang ocaml>type quaternion = float * float * float * float


Line 657: Line 658:
val reciprocal : quaternion -> quaternion</lang>
val reciprocal : quaternion -> quaternion</lang>


using this module in the interpreter:
<pre>
<pre>
$ ocamlc -c q.mli
$ ocamlc -c q.mli