#define INCLUDES APLCB+APLMAIN+STDIO
#include "includes.h"
main()
{
     Dblnor; Dblnorp; Dyadic; Endoper;
     Idyadic; Inor; Inorp; Litvect;
     Nor; Norp; Relative; Quadout;
     double left=1.0,rite=1.0,ret;
     int ileft=1,irite=1,iret;
     #include "aplinit.h"

     endoper(quadout(relative(nor,
          litvect("1.1 2.2 3.3"),
          litvect("3.3 2.2 1.1"))));
     endoper(quadout(dyadic(dblnor,
          litvect("0.0 0.0 1.0 1.0"),
          litvect("0.0 1.0 0.0 1.0"))));
     endoper(quadout(idyadic(inor,
          litvect("1 2 3"),
          litvect("3 2 1"))));
     norp(&left,&rite,&iret);
     printf("norp returned %d\n",iret);
     dblnorp(&left,&rite,&ret);
     printf("dblnorp returned %f\n",ret);
     printf("inor returned %d\n",inor(ileft,irite));
     inorp(&ileft,&irite,&iret);
     printf("inorp returned %d\n",iret);
}