1 
2 #include <math.h>     /* Need these for general information for the compiler      */
3 #include <stdlib.h>
4 #include <stdio.h>
5 #include <string.h>
6 #include <fcntl.h>
7 
8 
m_copy(double * s,double * m)9 void  m_copy(double *s, double *m)
10 /* ********************************************************* */
11 /*  s(4,4) = m(4,4)   def. aus OpenGL                        */
12 /*               m( spalte,reihe)                            */
13 /* ********************************************************* */
14 {
15   int j;
16 
17   for (j=0; j<16;j++ )
18     s[j]= m[j];
19 }
20 
21 
22