testmx.cpp

eC++编译器源码

#include <Matrixs.h>
#include <IMatrix.h>
#include <Complex.h>
#include <iostream.h>

void print(Matrix x)
{unsigned int i,j,m,n; double d;
   MatrixSize(x, m, n);
   for (i=1; i<=n; i++) {
     for (j=1; j<=m; j++) {
       d = ReadElement(x,i,j);
       cout<<d;
     };
     cout<<'\n';
   };
};

void print(IMatrix x)
{unsigned int i,j,m,n; Complex c;
   MatrixSize(x, m, n);
   for (i=1; i<=n; i++) {
     for (j=1; j<=m; j++) {
       ReadElement(x,i,j, c);
       Write(c,10);
     };
     cout<<'\n';
   };
};

void main()
{ Matrix x,y;   IMatrix xx,yy; Complex c;
  OpenMatrix(x, 2,2);
  EnterElement(x,1,1,2.0);
  EnterElement(x,1,2,3.0);
  EnterElement(x,2,1,1.0);
  EnterElement(x,2,2,4.0);
  Multiply(x,x,y);
  print(y);
  Inverse(x);
  print(x);

  OpenMatrix(xx, 2,2);
  Cons(2.0,0.0,c); EnterElement(xx,1,1,c);
  Cons(3.0,0.0,c); EnterElement(xx,1,2,c);
  Cons(1.0,0.0,c); EnterElement(xx,2,1,c);
  Cons(4.0,0.0,c); EnterElement(xx,2,2,c);
  Multiply(xx,xx,yy);
  print(yy);
  Inverse(xx);
  print(xx);
};