#define INCLUDES APLCB+APLMAIN+STDIO
#include "includes.h"
main()
{
     Chrvect; Endoper; Execute; Execqcr; Execqfx;
     Litvect; Quadout; Reshape;
     #include "aplinit.h"

     endoper(
       quadout(
         execqfx(
           reshape(
             litvect("2 7"),
             chrvect("z#sum x z#+/x ")))));
     endoper(
       quadout(
         execqcr(chrvect("sum"))));
     endoper(execute(chrvect("sum 1 3 5 7 9")));
}