File: Mat4Utils.c

package info (click to toggle)
theseus 3.3.0-14
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 91,424 kB
  • sloc: ansic: 41,682; makefile: 267; sh: 121
file content (116 lines) | stat: -rw-r--r-- 2,728 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
/*
    Theseus - maximum likelihood superpositioning of macromolecular structures

    Copyright (C) 2004-2015 Douglas L. Theobald

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the:

    Free Software Foundation, Inc.,
    59 Temple Place, Suite 330,
    Boston, MA  02111-1307  USA

    -/_|:|_|_\-
*/

#include <stdio.h>
#include <math.h>
#include <stdlib.h>
#include <string.h>
#include "Mat4Utils.h"


void
Mat4Print(double **matrix)
{
    int             i;

    printf("\n");
    for (i = 0; i < 4; ++i)
    {
        printf(" [ % 14.8f % 14.8f % 14.8f % 14.8f ]\n",
               matrix[i][0],
               matrix[i][1],
               matrix[i][2],
               matrix[i][3]);
    }
    printf("\n");

    fflush(NULL);
}


void
Mat4Copy(double **matrix2, const double **matrix1)
{
    int            i;

    for (i = 0; i < 4; ++i)
       memcpy(matrix2[i], matrix1[i], 4 * sizeof(double));
}


void
Mat4TransposeIp(double **matrix)
{
    double tmp;

    tmp          = matrix[0][1];
    matrix[0][1] = matrix[1][0];
    matrix[1][0] = tmp;

    tmp          = matrix[0][2];
    matrix[0][2] = matrix[2][0];
    matrix[2][0] = tmp;

    tmp          = matrix[0][3];
    matrix[0][3] = matrix[3][0];
    matrix[3][0] = tmp;

    tmp          = matrix[2][1];
    matrix[2][1] = matrix[1][2];
    matrix[1][2] = tmp;

    tmp          = matrix[3][1];
    matrix[3][1] = matrix[1][3];
    matrix[1][3] = tmp;

    tmp          = matrix[3][2];
    matrix[3][2] = matrix[2][3];
    matrix[2][3] = tmp;
}


void
Mat4TransposeOp(double **matrix2, const double **matrix1)
{
    matrix2[0][0] = matrix1[0][0];
    matrix2[0][1] = matrix1[1][0];
    matrix2[0][2] = matrix1[2][0];
    matrix2[0][3] = matrix1[3][0];

    matrix2[1][0] = matrix1[0][1];
    matrix2[1][1] = matrix1[1][1];
    matrix2[1][2] = matrix1[2][1];
    matrix2[1][3] = matrix1[3][1];
    
    matrix2[2][0] = matrix1[0][2];
    matrix2[2][1] = matrix1[1][2];
    matrix2[2][2] = matrix1[2][2];
    matrix2[2][3] = matrix1[3][2];

    matrix2[3][0] = matrix1[0][3];
    matrix2[3][1] = matrix1[1][3];
    matrix2[3][2] = matrix1[2][3];
    matrix2[3][3] = matrix1[3][3];
}