#define INCLUDES APLCB+APLMAIN+STDIO
#include "includes.h"
main()
{
     Endoper; Indxsub; Innrprd; Litvect; Plus;
     Quadout; Reshape; Times;
     double identity=0.0;
     #include "aplinit.h"

     endoper(
          quadout( /* ---------------------> 26.62 33.88 */
               innrprd(                   /* 59.29 77.44 */
                    plus,
                    times,
                    &identity,
                    reshape(
                         litvect("2 3"),
                         litvect("1.1 2.2 3.3 4.4 5.5 6.6")
                    ),
                    reshape(
                         litvect("3 2"),
                         litvect("1.1 2.2 3.3 4.4 5.5 6.6")
                    )
               )
          )
     );
}