| Line | Branch | Exec | Source |
|---|---|---|---|
| 1 | /* | ||
| 2 | - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | ||
| 3 | SLEPc - Scalable Library for Eigenvalue Problem Computations | ||
| 4 | Copyright (c) 2002-, Universitat Politecnica de Valencia, Spain | ||
| 5 | |||
| 6 | This file is part of SLEPc. | ||
| 7 | SLEPc is distributed under a 2-clause BSD license (see LICENSE). | ||
| 8 | - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | ||
| 9 | */ | ||
| 10 | |||
| 11 | static char help[] = "Tests B-orthonormality of eigenvectors in a GHEP problem.\n\n"; | ||
| 12 | |||
| 13 | #include <slepceps.h> | ||
| 14 | |||
| 15 | 530 | int main(int argc,char **argv) | |
| 16 | { | ||
| 17 | 530 | Mat A,B; /* matrices */ | |
| 18 | 530 | EPS eps; /* eigenproblem solver context */ | |
| 19 | 530 | ST st; | |
| 20 | 530 | Vec *X,v; | |
| 21 | 530 | PetscReal lev=0.0,tol=PETSC_SMALL; | |
| 22 | 530 | PetscInt N,n=45,m,Istart,Iend,II,i,j,nconv; | |
| 23 | 530 | PetscBool flag,skiporth=PETSC_FALSE; | |
| 24 | 530 | EPSPowerShiftType variant; | |
| 25 | |||
| 26 |
1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
|
530 | PetscFunctionBeginUser; |
| 27 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(SlepcInitialize(&argc,&argv,NULL,help)); |
| 28 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(PetscOptionsGetInt(NULL,NULL,"-n",&n,NULL)); |
| 29 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(PetscOptionsGetInt(NULL,NULL,"-m",&m,&flag)); |
| 30 |
1/2✓ Branch 0 taken 10 times.
✗ Branch 1 not taken.
|
530 | if (!flag) m=n; |
| 31 | 530 | N = n*m; | |
| 32 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(PetscPrintf(PETSC_COMM_WORLD,"\nGeneralized Symmetric Eigenproblem, N=%" PetscInt_FMT " (%" PetscInt_FMT "x%" PetscInt_FMT " grid)\n\n",N,n,m)); |
| 33 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(PetscOptionsGetBool(NULL,NULL,"-skiporth",&skiporth,NULL)); |
| 34 | |||
| 35 | /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | ||
| 36 | Compute the matrices that define the eigensystem, Ax=kBx | ||
| 37 | - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */ | ||
| 38 | |||
| 39 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatCreate(PETSC_COMM_WORLD,&A)); |
| 40 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatSetSizes(A,PETSC_DECIDE,PETSC_DECIDE,N,N)); |
| 41 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatSetFromOptions(A)); |
| 42 | |||
| 43 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatCreate(PETSC_COMM_WORLD,&B)); |
| 44 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatSetSizes(B,PETSC_DECIDE,PETSC_DECIDE,N,N)); |
| 45 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatSetFromOptions(B)); |
| 46 | |||
| 47 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatGetOwnershipRange(A,&Istart,&Iend)); |
| 48 |
2/2✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
|
187640 | for (II=Istart;II<Iend;II++) { |
| 49 | 187110 | i = II/n; j = II-i*n; | |
| 50 |
6/8✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
|
187110 | if (i>0) PetscCall(MatSetValue(A,II,II-n,-1.0,INSERT_VALUES)); |
| 51 |
6/8✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
|
187110 | if (i<m-1) PetscCall(MatSetValue(A,II,II+n,-1.0,INSERT_VALUES)); |
| 52 |
6/8✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
|
187110 | if (j>0) PetscCall(MatSetValue(A,II,II-1,-1.0,INSERT_VALUES)); |
| 53 |
6/8✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
|
187110 | if (j<n-1) PetscCall(MatSetValue(A,II,II+1,-1.0,INSERT_VALUES)); |
| 54 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
187110 | PetscCall(MatSetValue(A,II,II,4.0,INSERT_VALUES)); |
| 55 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
187110 | PetscCall(MatSetValue(B,II,II,2.0/PetscLogScalar(II+2),INSERT_VALUES)); |
| 56 | } | ||
| 57 | |||
| 58 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatAssemblyBegin(A,MAT_FINAL_ASSEMBLY)); |
| 59 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatAssemblyEnd(A,MAT_FINAL_ASSEMBLY)); |
| 60 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatAssemblyBegin(B,MAT_FINAL_ASSEMBLY)); |
| 61 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatAssemblyEnd(B,MAT_FINAL_ASSEMBLY)); |
| 62 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatCreateVecs(B,&v,NULL)); |
| 63 | |||
| 64 | /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | ||
| 65 | Create the eigensolver and set various options | ||
| 66 | - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */ | ||
| 67 | |||
| 68 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSCreate(PETSC_COMM_WORLD,&eps)); |
| 69 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSSetOperators(eps,A,B)); |
| 70 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSSetProblemType(eps,EPS_GHEP)); |
| 71 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSSetTolerances(eps,tol,PETSC_CURRENT)); |
| 72 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSSetConvergenceTest(eps,EPS_CONV_NORM)); |
| 73 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSSetFromOptions(eps)); |
| 74 | |||
| 75 | /* illustrate how to extract parameters from specific solver types */ | ||
| 76 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(PetscObjectTypeCompare((PetscObject)eps,EPSPOWER,&flag)); |
| 77 |
2/2✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
|
530 | if (flag) { |
| 78 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
40 | PetscCall(EPSGetST(eps,&st)); |
| 79 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
40 | PetscCall(PetscObjectTypeCompare((PetscObject)st,STSHIFT,&flag)); |
| 80 |
2/2✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
|
40 | if (flag) { |
| 81 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
10 | PetscCall(EPSPowerGetShiftType(eps,&variant)); |
| 82 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
10 | PetscCall(PetscPrintf(PETSC_COMM_WORLD,"Type of shifts used during power iteration: %s\n",EPSPowerShiftTypes[variant])); |
| 83 | } | ||
| 84 | } | ||
| 85 | |||
| 86 | /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | ||
| 87 | Solve the eigensystem | ||
| 88 | - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */ | ||
| 89 | |||
| 90 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSSolve(eps)); |
| 91 | |||
| 92 | /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - | ||
| 93 | Display solution and clean up | ||
| 94 | - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */ | ||
| 95 | |||
| 96 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSGetTolerances(eps,&tol,NULL)); |
| 97 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSErrorView(eps,EPS_ERROR_BACKWARD,NULL)); |
| 98 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSGetConverged(eps,&nconv)); |
| 99 |
1/2✓ Branch 0 taken 10 times.
✗ Branch 1 not taken.
|
530 | if (nconv>1) { |
| 100 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(VecDuplicateVecs(v,nconv,&X)); |
| 101 |
7/8✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 10 times.
✓ Branch 3 taken 8 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 6 taken 2 times.
✓ Branch 7 taken 2 times.
|
17390 | for (i=0;i<nconv;i++) PetscCall(EPSGetEigenvector(eps,i,X[i],NULL)); |
| 102 |
6/8✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
|
530 | if (!skiporth) PetscCall(VecCheckOrthonormality(X,nconv,NULL,nconv,B,NULL,&lev)); |
| 103 |
6/8✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.
|
530 | if (lev<10*tol) PetscCall(PetscPrintf(PETSC_COMM_WORLD,"Level of orthogonality below the tolerance\n")); |
| 104 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
60 | else PetscCall(PetscPrintf(PETSC_COMM_WORLD,"Level of orthogonality: %g\n",(double)lev)); |
| 105 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(VecDestroyVecs(nconv,&X)); |
| 106 | } | ||
| 107 | |||
| 108 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(EPSDestroy(&eps)); |
| 109 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatDestroy(&A)); |
| 110 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(MatDestroy(&B)); |
| 111 |
4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
|
530 | PetscCall(VecDestroy(&v)); |
| 112 |
3/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 2 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
530 | PetscCall(SlepcFinalize()); |
| 113 | return 0; | ||
| 114 | } | ||
| 115 | |||
| 116 | /*TEST | ||
| 117 | |||
| 118 | testset: | ||
| 119 | args: -n 18 -eps_nev 4 -eps_max_it 1500 | ||
| 120 | requires: !single | ||
| 121 | output_file: output/test1_1.out | ||
| 122 | test: | ||
| 123 | suffix: 1 | ||
| 124 | args: -eps_type {{krylovschur arnoldi gd jd lapack}} | ||
| 125 | test: | ||
| 126 | suffix: 1_subspace | ||
| 127 | args: -eps_type subspace -eps_conv_rel | ||
| 128 | test: | ||
| 129 | suffix: 1_ks_nopurify | ||
| 130 | args: -eps_purify 0 | ||
| 131 | test: | ||
| 132 | suffix: 1_ks_trueres | ||
| 133 | args: -eps_true_residual | ||
| 134 | test: | ||
| 135 | suffix: 1_ks_sinvert | ||
| 136 | args: -st_type sinvert -eps_target 22 | ||
| 137 | test: | ||
| 138 | suffix: 1_ks_cayley | ||
| 139 | args: -st_type cayley -eps_target 22 | ||
| 140 | test: | ||
| 141 | suffix: 1_lanczos | ||
| 142 | args: -eps_type lanczos -eps_lanczos_reorthog full | ||
| 143 | test: | ||
| 144 | suffix: 1_gd2 | ||
| 145 | args: -eps_type gd -eps_gd_double_expansion | ||
| 146 | test: | ||
| 147 | suffix: 1_gd_borth | ||
| 148 | args: -eps_type gd -eps_gd_borth | ||
| 149 | test: | ||
| 150 | suffix: 1_jd_borth | ||
| 151 | args: -eps_type jd -eps_jd_borth | ||
| 152 | test: | ||
| 153 | suffix: 1_lobpcg | ||
| 154 | args: -eps_type lobpcg -st_shift 22 -eps_largest_real | ||
| 155 | test: | ||
| 156 | suffix: 1_hpddm | ||
| 157 | requires: hpddm | ||
| 158 | args: -eps_type lobpcg -st_shift 22 -eps_largest_real -st_pc_type lu -st_ksp_type hpddm | ||
| 159 | test: | ||
| 160 | suffix: 1_cholesky | ||
| 161 | args: -mat_type sbaij | ||
| 162 | test: | ||
| 163 | suffix: 1_scalapack | ||
| 164 | nsize: {{1 2 3}} | ||
| 165 | requires: scalapack !__float128 | ||
| 166 | args: -eps_type scalapack | ||
| 167 | test: | ||
| 168 | suffix: 1_elpa | ||
| 169 | nsize: {{1 2 3}} | ||
| 170 | requires: elpa | ||
| 171 | args: -eps_type elpa | ||
| 172 | filter: grep -v "Buffering level" | ||
| 173 | test: | ||
| 174 | suffix: 1_elemental | ||
| 175 | nsize: {{1 2}} | ||
| 176 | requires: elemental | ||
| 177 | args: -eps_type elemental | ||
| 178 | |||
| 179 | testset: | ||
| 180 | args: -n 18 -eps_type ciss -rg_interval_endpoints 20.8,22 | ||
| 181 | requires: !single | ||
| 182 | output_file: output/test1_1_ciss.out | ||
| 183 | test: | ||
| 184 | suffix: 1_ciss | ||
| 185 | args: -eps_ciss_extraction {{ritz hankel}} | ||
| 186 | test: | ||
| 187 | suffix: 1_ciss_ksps | ||
| 188 | args: -eps_ciss_usest 0 -eps_ciss_integration_points 12 | ||
| 189 | requires: !__float128 | ||
| 190 | test: | ||
| 191 | suffix: 1_ciss_gnhep | ||
| 192 | args: -eps_gen_non_hermitian -skiporth | ||
| 193 | test: | ||
| 194 | suffix: 1_ciss_trapezoidal | ||
| 195 | args: -eps_ciss_quadrule trapezoidal -eps_ciss_integration_points 24 -eps_ciss_extraction hankel -eps_ciss_delta 1e-10 -eps_tol 5e-11 -skiporth | ||
| 196 | test: | ||
| 197 | suffix: 1_ciss_cuda | ||
| 198 | args: -mat_type aijcusparse -st_pc_factor_mat_solver_type cusparse | ||
| 199 | requires: cuda | ||
| 200 | test: | ||
| 201 | suffix: 1_ciss_hip | ||
| 202 | args: -mat_type aijhipsparse -st_pc_factor_mat_solver_type hipsparse | ||
| 203 | requires: hip | ||
| 204 | |||
| 205 | testset: | ||
| 206 | requires: !single | ||
| 207 | args: -eps_tol 1e-10 -st_type sinvert -st_ksp_type preonly -st_pc_type cholesky | ||
| 208 | test: | ||
| 209 | suffix: 2 | ||
| 210 | args: -eps_interval .1,1.1 | ||
| 211 | test: | ||
| 212 | suffix: 2_open | ||
| 213 | args: -eps_interval -inf,1.1 | ||
| 214 | test: | ||
| 215 | suffix: 2_parallel | ||
| 216 | requires: mumps !complex | ||
| 217 | nsize: 3 | ||
| 218 | args: -eps_interval .1,1.1 -eps_krylovschur_partitions 2 -st_pc_factor_mat_solver_type mumps -st_mat_mumps_icntl_13 1 | ||
| 219 | output_file: output/test1_2.out | ||
| 220 | |||
| 221 | test: | ||
| 222 | suffix: 3 | ||
| 223 | requires: !single | ||
| 224 | args: -n 18 -eps_type power -eps_conv_rel -eps_nev 3 | ||
| 225 | |||
| 226 | test: | ||
| 227 | suffix: 4 | ||
| 228 | requires: !single | ||
| 229 | args: -n 18 -eps_type power -eps_conv_rel -eps_nev 3 -st_type sinvert -eps_target 1.149 -eps_power_shift_type {{constant rayleigh wilkinson}} | ||
| 230 | |||
| 231 | testset: | ||
| 232 | args: -n 18 -eps_nev 3 -eps_smallest_real -eps_max_it 500 -st_pc_type icc | ||
| 233 | output_file: output/test1_5.out | ||
| 234 | test: | ||
| 235 | suffix: 5_rqcg | ||
| 236 | args: -eps_type rqcg | ||
| 237 | test: | ||
| 238 | suffix: 5_lobpcg | ||
| 239 | args: -eps_type lobpcg -eps_lobpcg_blocksize 3 | ||
| 240 | test: | ||
| 241 | suffix: 5_hpddm | ||
| 242 | args: -eps_type lobpcg -eps_lobpcg_blocksize 3 -st_pc_type lu -st_ksp_type hpddm | ||
| 243 | requires: hpddm | ||
| 244 | test: | ||
| 245 | suffix: 5_blopex | ||
| 246 | args: -eps_type blopex -eps_conv_abs -st_shift 0.1 | ||
| 247 | requires: blopex | ||
| 248 | |||
| 249 | testset: | ||
| 250 | args: -n 18 -eps_nev 12 -eps_mpd 8 -eps_max_it 3000 | ||
| 251 | requires: !single | ||
| 252 | output_file: output/test1_6.out | ||
| 253 | test: | ||
| 254 | suffix: 6 | ||
| 255 | args: -eps_type {{krylovschur arnoldi gd}} | ||
| 256 | test: | ||
| 257 | suffix: 6_lanczos | ||
| 258 | args: -eps_type lanczos -eps_lanczos_reorthog full | ||
| 259 | test: | ||
| 260 | suffix: 6_subspace | ||
| 261 | args: -eps_type subspace -eps_conv_rel | ||
| 262 | |||
| 263 | testset: | ||
| 264 | args: -n 18 -eps_nev 4 -eps_max_it 1500 -mat_type aijcusparse | ||
| 265 | requires: cuda !single | ||
| 266 | output_file: output/test1_1.out | ||
| 267 | test: | ||
| 268 | suffix: 7 | ||
| 269 | args: -eps_type {{krylovschur arnoldi gd jd}} | ||
| 270 | test: | ||
| 271 | suffix: 7_subspace | ||
| 272 | args: -eps_type subspace -eps_conv_rel | ||
| 273 | test: | ||
| 274 | suffix: 7_ks_sinvert | ||
| 275 | args: -st_type sinvert -eps_target 22 | ||
| 276 | test: | ||
| 277 | suffix: 7_lanczos | ||
| 278 | args: -eps_type lanczos -eps_lanczos_reorthog full | ||
| 279 | test: | ||
| 280 | suffix: 7_ciss | ||
| 281 | args: -eps_type ciss -rg_interval_endpoints 20.8,22 -st_pc_factor_mat_solver_type cusparse | ||
| 282 | output_file: output/test1_1_ciss.out | ||
| 283 | |||
| 284 | testset: | ||
| 285 | args: -n 18 -eps_nev 3 -eps_smallest_real -eps_max_it 500 -st_pc_type sor -mat_type aijcusparse | ||
| 286 | requires: cuda | ||
| 287 | output_file: output/test1_5.out | ||
| 288 | test: | ||
| 289 | suffix: 8_rqcg | ||
| 290 | args: -eps_type rqcg | ||
| 291 | test: | ||
| 292 | suffix: 8_lobpcg | ||
| 293 | args: -eps_type lobpcg -eps_lobpcg_blocksize 3 | ||
| 294 | |||
| 295 | testset: | ||
| 296 | nsize: 2 | ||
| 297 | args: -n 18 -eps_nev 7 -eps_ncv 32 -ds_parallel synchronized | ||
| 298 | filter: grep -v "orthogonality" | sed -e "s/[+-]0\.0*i//g" | sed -e "s/0.61338/0.61339/g" | ||
| 299 | output_file: output/test1_9.out | ||
| 300 | test: | ||
| 301 | suffix: 9_ks_ghep | ||
| 302 | args: -eps_gen_hermitian -st_pc_type redundant -st_type sinvert | ||
| 303 | test: | ||
| 304 | suffix: 9_ks_gnhep | ||
| 305 | args: -eps_gen_non_hermitian -st_pc_type redundant -st_type sinvert | ||
| 306 | test: | ||
| 307 | suffix: 9_ks_ghiep | ||
| 308 | args: -eps_gen_indefinite -st_pc_type redundant -st_type sinvert | ||
| 309 | requires: !single | ||
| 310 | test: | ||
| 311 | suffix: 9_lobpcg_ghep | ||
| 312 | args: -eps_gen_hermitian -eps_type lobpcg -eps_max_it 200 -eps_lobpcg_blocksize 6 | ||
| 313 | requires: !single | ||
| 314 | timeoutfactor: 2 | ||
| 315 | test: | ||
| 316 | suffix: 9_jd_gnhep | ||
| 317 | args: -eps_gen_non_hermitian -eps_type jd -eps_target 0 -eps_ncv 64 | ||
| 318 | requires: !single | ||
| 319 | timeoutfactor: 2 | ||
| 320 | |||
| 321 | test: | ||
| 322 | suffix: 10_feast | ||
| 323 | args: -n 25 -eps_type feast -eps_interval .95,1.1 -eps_conv_rel -eps_tol 1e-6 | ||
| 324 | requires: feast | ||
| 325 | |||
| 326 | testset: | ||
| 327 | args: -n 18 -eps_nev 4 -eps_max_it 1500 -mat_type aijhipsparse | ||
| 328 | requires: hip !single | ||
| 329 | output_file: output/test1_1.out | ||
| 330 | test: | ||
| 331 | suffix: 11 | ||
| 332 | args: -eps_type {{krylovschur arnoldi gd jd}} | ||
| 333 | test: | ||
| 334 | suffix: 11_subspace | ||
| 335 | args: -eps_type subspace -eps_conv_rel | ||
| 336 | test: | ||
| 337 | suffix: 11_ks_sinvert | ||
| 338 | args: -st_type sinvert -eps_target 22 | ||
| 339 | test: | ||
| 340 | suffix: 11_lanczos | ||
| 341 | args: -eps_type lanczos -eps_lanczos_reorthog full | ||
| 342 | test: | ||
| 343 | suffix: 11_ciss | ||
| 344 | args: -eps_type ciss -rg_interval_endpoints 20.8,22 -st_pc_factor_mat_solver_type hipsparse | ||
| 345 | output_file: output/test1_1_ciss.out | ||
| 346 | |||
| 347 | testset: | ||
| 348 | args: -n 18 -eps_nev 3 -eps_smallest_real -eps_max_it 500 -st_pc_type sor -mat_type aijhipsparse | ||
| 349 | requires: hip | ||
| 350 | output_file: output/test1_5.out | ||
| 351 | test: | ||
| 352 | suffix: 12_rqcg | ||
| 353 | args: -eps_type rqcg | ||
| 354 | test: | ||
| 355 | suffix: 12_lobpcg | ||
| 356 | args: -eps_type lobpcg -eps_lobpcg_blocksize 3 | ||
| 357 | |||
| 358 | TEST*/ | ||
| 359 |