9be06ff4baa470f8d6387fffce8bfb592a589876
[scilab.git] / scilab / modules / arnoldi / includes / eigs_dependencies.h
1 /*
2  * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3  * Copyright (C) 2011 - Scilab Enterprises - Adeline CARNIS
4  *
5  * This file must be used under the terms of the CeCILL.
6  * This source file is licensed as described in the file COPYING, which
7  * you should have received as part of this distribution.  The terms
8  * are also available at
9  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
10  *
11  */
12 /*--------------------------------------------------------------------------*/
13 #ifndef __RTIMESRprime_H__
14 #define __RTIMESRprime_H__
15 #include "doublecomplex.h"
16 #include <string.h>
17 #include <math.h>
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include "stack-c.h"
21 #include "MALLOC.h"
22 #include "sciprint.h"
23
24 /**
25  * @TODO add comment
26  *
27  * @param result
28  * @param R
29  * @param Rprime
30  * @param N
31  */
32 void RtimesRprime(double* result, double* R, double* Rprime, int N);
33
34 /**
35  * @TODO add comment
36  *
37  * @param result
38  * @param R
39  * @param A
40  * @param Rprime
41  * @param N
42  */
43 void invR_times_A_times_invRprime(double* result, double* R, double* A, double* Rprime, int N);
44
45 /**
46  * @TODO add comment
47  *
48  * @param result
49  * @param U
50  * @param L
51  * @param E
52  * @param N
53  */
54 void invU_times_invL_times_E(double* result, double* U, double* L, double* E, int N);
55
56 /**
57  * @TODO add comment
58  *
59  * @param result
60  * @param R
61  * @param Rprime
62  * @param N
63  */
64 void RCtimesRCprime(doublecomplex* result, doublecomplex* R, doublecomplex* Rprime, int N);
65
66 /**
67  * @TODO add comment
68  *
69  * @param result
70  * @param R
71  * @param A
72  * @param Rprime
73  * @param N
74  */
75 void invRC_times_AC_times_invRCprime(doublecomplex* result, doublecomplex* R, doublecomplex* A, doublecomplex* Rprime, int N);
76
77 /**
78  * @TODO add comment
79  *
80  * @param result
81  * @param U
82  * @param L
83  * @param E
84  * @param N
85  */
86 void invUC_times_invLC_times_EC(doublecomplex* result, doublecomplex* U, doublecomplex* L, doublecomplex* E, int N);
87
88 #endif /* __RTIMESRprime_H__ */
89 /*--------------------------------------------------------------------------*/
90