1 /* Siconos is a program dedicated to modeling, simulation and control
2 * of non smooth dynamical systems.
3 *
4 * Copyright 2021 INRIA.
5 *
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
9 *
10 * http://www.apache.org/licenses/LICENSE-2.0
11 *
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
17 */
18
19 #include "op3x3.h"
20
21
22 /** print a matrix
23 * \param mat double* a
24 */
25 #include <stdio.h>
print3x3(double * mat)26 void print3x3(double* mat)
27 {
28 SET3X3(mat);
29
30 printf("%10.4g ", *mat00);
31 printf("%10.4g ", *mat01);
32 printf("%10.4g\n", *mat02);
33
34 printf("%10.4g ", *mat10);
35 printf("%10.4g ", *mat11);
36 printf("%10.4g\n", *mat12);
37
38 printf("%10.4g ", *mat20);
39 printf("%10.4g ", *mat21);
40 printf("%10.4g\n", *mat22);
41
42 }
43
44 /** print a vector
45 * \param[in] v double*
46 */
print3(double * v)47 void print3(double* v)
48 {
49 printf("%10.4g\n", *v++);
50 printf("%10.4g\n", *v++);
51 printf("%10.4g\n", *v);
52 }
53