-
Notifications
You must be signed in to change notification settings - Fork 8
/
Copy pathr8pbu.hpp
57 lines (57 loc) · 2 KB
/
r8pbu.hpp
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
//
// I4 Utilities.
//
int i4_log_10 ( int i );
int i4_max ( int i1, int i2 );
int i4_min ( int i1, int i2 );
int i4_power ( int i, int j );
//
// R8 Utilities.
//
double r8_max ( double x, double y );
double r8_uniform_01 ( int &seed );
//
// Real double precision General.
//
double r8ge_det ( int n, double a[], int pivot[] );
int r8ge_fa ( int n, double a[], int pivot[] );
void r8ge_print ( int m, int n, double a[], string title );
void r8ge_print_some ( int m, int n, double a[], int ilo, int jlo, int ihi,
int jhi, string title );
//
// Real double precision Positive Definite Symmetric Band, Upper.
//
double *r8pbu_cg ( int n, int mu, double a[], double b[], double xinit[] );
double r8pbu_det ( int n, int mu, double a[] );
double *r8pbu_dif2 ( int m, int n, int mu );
double *r8pbu_fa ( int n, int mu, double a[] );
double *r8pbu_indicator ( int n, int mu );
double *r8pbu_ml ( int n, int mu, double a[], double x[] );
double *r8pbu_mv ( int m, int n, int mu, double a[], double x[] );
void r8pbu_print ( int n, int mu, double a[], string title );
void r8pbu_print_some ( int n, int mu, double a[], int ilo, int jlo, int ihi,
int jhi, string title );
double *r8pbu_random ( int n, int mu, int &seed );
double *r8pbu_res ( int m, int n, int mu, double a[], double x[], double b[] );
double *r8pbu_sl ( int n, int mu, double a[], double b[] );
double *r8pbu_sor ( int n, int mu, double a[], double b[], double eps, int itchk,
int itmax, double omega, double x_init[] );
double *r8pbu_to_r8ge ( int n, int mu, double a[] );
double *r8pbu_zeros ( int n, int mu );
//
// R8VEC utilities.
//
double *r8vec_indicator1_new ( int n );
void r8vec_print ( int n, double a[], string title );
void r8vec_print_some ( int n, double a[], int max_print, string title );
double *r8vec_uniform_01_new ( int n, int &seed );
double *r8vec_zeros_new ( int n );
//
// R8VEC2 Utilities.
//
void r8vec2_print_some ( int n, double x1[], double x2[], int max_print,
string title );
//
// Utility to print the time.
//
void timestamp ( );