aaz_p_mzr_c.c

来自「一些矩阵运算的C代码实现：矩阵一般运算」· C语言 代码 · 共 43 行

/* xa_hfile.h                 freeware http://groups.yahoo.com/group/mathc/   */
/* --------------------------------- INCLUDES ------------------------------- */
#include "y_ahfile.h"
/* --------------------------------- MAIN ----------------------------------- */
int main(void)
{
double pbA[3][3*C2]=
{
1,1,  3,2,  3,2,
0,1,  0,1,  7,1,
2,3,  8,5,  4,4,
};
mZ A={3,3*C2,&pbA[0][0]};

double pbB[3][6]=
{
 +1.00000,+1.00000,  +3.00000,+2.00000,  +3.00000,+2.00000,
 +0.00000,+1.00000,  +0.00000,+1.00000,  +7.00000,+1.00000,
 +2.00000,+3.00000,  +8.00000,+5.00000,  +4.00000,+4.00000,
};
 mZ B={3,6,&pbB[0][0]};

/*-------------------------------- PROGRAM ---------------------------------- */
 printf(" A: \n");
 p_mZ(&A);
 getchar();

 printf(" Copy and past the matrix B into this file\n\n");
 p_mZ_c(&A,"B");
 getchar();

 printf(" B: \n");
 p_mZ(&B);

 printf("\n Press return to continue");
 getchar();

 return 0;
}