1 |
picher |
199 |
// (c) 2006 Jean-Marc DROUET/OptiS ********************************** minv.h * > |
2 |
|
|
// |
3 |
|
|
// 4-04-2006 |
4 |
|
|
// |
5 |
|
|
//****************************************************************************** |
6 |
|
|
|
7 |
|
|
#ifndef _minvh |
8 |
|
|
#define _minvh |
9 |
|
|
|
10 |
|
|
#include "bib_0000.h" |
11 |
|
|
#include "bib_m000.h" |
12 |
|
|
#include "bib_m012.h" |
13 |
|
|
#include "maz.h" |
14 |
|
|
|
15 |
|
|
//****************************************************************************** |
16 |
|
|
// types globaux du module minv |
17 |
|
|
|
18 |
|
|
//****************************************************************************** |
19 |
|
|
// constantes globales du module minv |
20 |
|
|
|
21 |
|
|
//****************************************************************************** |
22 |
|
|
// variables globales du module minv |
23 |
|
|
|
24 |
|
|
//****************************************************************************** |
25 |
|
|
// |
26 |
|
|
// matrice inverse de la matrice carrée [A] ([A] est modifiée) |
27 |
|
|
// |
28 |
|
|
// méthode de Gauss-Jordan |
29 |
|
|
// h |
30 |
|
|
|
31 |
|
|
ty_RSLT minv( vifl *_A , // matrice [A] |
32 |
|
|
ulong _n , // dimension de la matrice [A] (n x n) |
33 |
|
|
vifl *_invA ); // inverse de la matrice : [A]^(-1) |
34 |
|
|
|
35 |
|
|
//****************************************************************************** |
36 |
|
|
// |
37 |
|
|
// matrice inverse de la matrice carrée [A] ([A] n'est pas modifiée) |
38 |
|
|
// |
39 |
|
|
// méthode de Gauss-Jordan |
40 |
|
|
// h |
41 |
|
|
|
42 |
|
|
ty_RSLT minv_v2( vifl *_A , // matrice [A] |
43 |
|
|
ulong _n , // dimension de la matrice [A] (n x n) |
44 |
|
|
vifl *_invA ); // inverse de la matrice : [A]^(-1) |
45 |
|
|
|
46 |
|
|
// (c) 2006 Jean-Marc DROUET/OptiS ********************************** minv.h * < |
47 |
|
|
|
48 |
|
|
#endif |