yecopym.h

[[ Complex Matrices : Language c]]

/* .h                     free ware                [e-mail]  */

/* ------------------------------------- FUNCTION --------------------------  */
/* Do    :                                                                    */
/*                                                                            */
/* -------------------------------------------------------------------------- */
void copy_mzF(
PmzF mA,
PmzF mB)
{
  int i;
  int j;

  for ( i=0 ; i<mA->rows ; i++)
    for ( j=0; j<mA->cols ; j++)
      *(mB->pb+i *mB->cols+j) = *(mA->pb+i *mA->cols+j);
}