/* See {DeterLR3.h} */
#include <DeterLR3.h>

#include <LR3Extras.h>
#include <r3.h>
#include <stdio.h>

VAR a,b,c: r3_t;
    double d;
{

  a = (r3_t){ 2.0,  3.0,  0.00};
  b = (r3_t){ 1.0,  0.0,  2.00};
  c = (r3_t){ 1.0,  0.0,  0.00};
  
  d = LR3Extras.Det(a,b,c);
  Wr.PutText(Stdio.stderr, "Determinante: " \
      Fmt.LongReal(d, Fmt.Style.Fix,prec = 2) & "\n");

} DeterLR3.