Metropoli BBS
VIEWER: sam076.c MODE: TEXT (ASCII)
#define INCLUDES APLMAIN+STDIO
#include "includes.h"
main()
{
     Invert; Matmult;
     static double a[3][3] = {
          {11.0, 12.0, 13.0},
          {50.0,  0.0, 42.0},
          {37.0, 73.0, 26.0}};
     static double x[3] = {218.0, 544.0, 805.0};
     double *answer;

     answer=matmult(invert((double *)a,3),x,3,3,1);
     printf("answer=%4.2f %4.2f %4.2f",
       *answer,*(answer+1),*(answer+2));
     free(answer);
}

[ RETURN TO DIRECTORY ]