xpcol.h

来自「基本矩阵运算 : + - *, power, transpose, trace,」· C头文件 代码 · 共 45 行

/* xpcol.h                      freeware                   [e-mail]  */

/* --------------------------------- FUNCTION ------------------------------  */
/* Do    :                                                                    */
/*                                                                            */


/* -------------------------------------------------------------------------- */
void p_cF(
PmF m,
int col)
{
  int i;

  for (i = 0 ; i < m->rows ; i++)
    {
     printf("\n");
     printf("%6.0f/%-6.0f",*(m->pb+i *m->cols+col*C2  ),
                           *(m->pb+i *m->cols+col*C2+1));
    }
  printf("\n");
}

/* --------------------------------- FUNCTION ------------------------------  */
/* Do    :                                                                    */
/*                                                                            */


/* -------------------------------------------------------------------------- */
void p_cI(
PmF m,
int col)
{
  int i;

  for (i = 0 ; i < m->rows ; i++)
    {
     printf("\n");
     printf("%6.0f",*(m->pb+i *m->cols+col*C2));
    }
  printf("\n");
}