#include "utility.h"

void mat_transpose(matrix)
/*============================================================================*/
/* PURPOSE: TRANSPOSE A THREE BY THREE MATRIX.
/* INPUTS:
/*	MATRIX		THREE BY THREE MATRIX.
/* OUTPUTS:
/*	MATRIX		TRANSPOSE OF ORIGINAL MATRIX.
/* WRITTEN: M.V.GRIESHABER
/* LAST MODIFICATION: 11 JUNE 1991 MVG
*/
   double matrix[3][3];
   {
   int i;
   int j;
   double temp;

   for (i=0; i<2; i++)
      {
      for (j=i+1; j<3; j++)
         {
         temp=matrix[i][j];
         matrix[i][j]=matrix[j][i];
         matrix[j][i]=temp;
         }
      }

   return;
   }