#define INCLUDES APLCB+APLMAIN+STDIO
#include "includes.h"
main()
{
     Dyadic; Endoper; Idyadic; Iplus; Iscalar;
     Plus; Plusp; Plusx; Quadout; Scalar;
     double left[2],rite[2],ret[2];
     #include "aplinit.h"

     endoper(quadout(dyadic(
       plus,scalar(1.2),scalar(3.4))));
     endoper(quadout(idyadic(
       iplus,iscalar(1),iscalar(1))));
     *left = 2.1;
     *rite = 5.6;
     plusp(left,rite,ret);
     printf("plusp returned %f\n",*ret);
     *left = 0;
     *(left + 1) = 12.0;
     *rite = 4.0;
     *(rite + 1) = 0;
     plusx(left,rite,ret);
     printf("plusx returned %fj%f\n",*ret,*(ret+1));
}