1 arta  1.1 extern void dcholesky_down_0(
 2           /*
 3           Given Cholesky decomposion of matrix compute decomposition of matrix
 4           with one row and column removed
 5           
 6           call dcholesky_down_0(uplo, n, a, lda, idel, info)
 7           uplo,n,a,lda are the same as for dpotrf
 8           idel is the column/row to be deleted 0<=idel<n
 9           */
10           char *uplo,
11           int *n,
12           double *a,
13           int *lda,
14           int *idel,
15           int *info
16           );
17           
18           extern void dcholesky_down_multi_0(
19           /*
20           Given Cholesky decomposion of matrix compute decomposition of matrix
21           with one row and column removed
22 arta  1.1 
23           call dcholesky_down_multi_0(uplo, n, a, lda, ndel, wdel, info)
24           uplo,n,a,lda are the same as for dpotrf
25           ndel is the number of columns/rows to be deleted
26           wdel is the list of columns/rows to be deleted
27           */
28           char *uplo,
29           int *n,
30           double *a,
31           int *lda,
32           int *ndel,
33           int *wdel,
34           int *info
35           );
36           
37           extern void dcholesky_down_mask(
38           /*
39           Given Cholesky decomposion of matrix compute decomposition of matrix
40           with one row and column removed
41           
42           call dcholesky_down_mask(uplo, n, a, lda, mask, info)
43 arta  1.1 uplo,n,a,lda are the same as for dpotrf
44           mask is 0 for elements to retain, !=0 for elements to remove
45           */
46           char *uplo,
47           int *n_in,
48           double *a,
49           int *lda,
50           int *mask,
51           int *info
52           );