#define INCLUDES APLCB+APLMAIN+STDIO
#include "includes.h"
main()
{
     Endoper; Litvect; Not; Quadout; Rmonadic; Signum;
     #include "aplinit.h"

     endoper(quadout(rmonadic(not,
          litvect("0 1.1 2.2 3.3")))); /* -> 1 0 0 0 */
     endoper(quadout(rmonadic(signum,
          litvect("3.14 0 -3.14")))); /* --> 1 0 -1 */
}