aar_smul.c

一些矩阵运算的C代码实现：矩阵一般运算

/*         .h         freeware           http://groups.yahoo.com/group/mathc/ */

/* ------------------------------- INCLUDES --------------------------------- */
#include "v_ahfile.h"
/* --------------------------------- MAIN ----------------------------------- */
int main(void)
{
double pbA[3][2]=
{
  1, 2,
  3, 0,
  5, 6,
};mR mA={3,2,&pbA[0][0]};

double pbsA[3][2];mR msA={3,2,&pbsA[0][0]};

double s;
/*-------------------------------- PROGRAM ---------------------------------- */
 clrscrn();

 s = 3.0;
 printf(" s = %10.3f \n\n", s);
 printf(" A");p_mR(&mA);printf("\n");

 smul_mR(s,&mA,&msA);
 printf(" sA \n");p_mR(&msA);printf("\n");

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

 return 0;
}