| /dports/science/hypre/hypre-2.23.0/src/test/ |
| H A D | fparcsr_ls.f | 14 integer ierr
37 integer ierr local
54 integer ierr local
71 integer ierr local
91 integer ierr local
111 integer ierr local
131 integer ierr local
149 integer ierr local
167 integer ierr local
185 integer ierr local
[all …]
|
| H A D | fstruct_ls.f | 19 integer ierr local
35 integer ierr local
50 integer ierr local
68 integer ierr local
86 integer ierr local
102 integer ierr local
119 integer ierr
137 integer ierr local
153 integer ierr local
169 integer ierr local
[all …]
|
| H A D | fsstruct_ls.f | 20 integer ierr local
39 integer ierr local
57 integer ierr local
78 integer ierr local
99 integer ierr local
118 integer ierr local
137 integer ierr local
156 integer ierr local
176 integer ierr
197 integer ierr local
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/dm/tutorials/ |
| H A D | ex19.c | 15 ierr = PetscInitialize(&argc,&argv,(char*)0,help);if (ierr) return ierr; in main()
22 ierr = DMDASetDof(da, 1);CHKERRQ(ierr); in main()
28 ierr = DMSetUp(da);CHKERRQ(ierr); in main()
30 ierr = DMDestroy(&da);CHKERRQ(ierr); in main()
44 ierr = DMSetUp(da);CHKERRQ(ierr); in main()
46 ierr = DMDestroy(&da);CHKERRQ(ierr); in main()
60 ierr = DMSetUp(da);CHKERRQ(ierr); in main()
76 ierr = DMSetUp(da);CHKERRQ(ierr); in main()
92 ierr = DMSetUp(da);CHKERRQ(ierr); in main()
109 ierr = DMSetUp(da);CHKERRQ(ierr); in main()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/mat/tests/ |
| H A D | ex145.c | 21 ierr = PetscInitialize(&argc,&argv,(char*) 0,help);if (ierr) return ierr; in main()
42 ierr = MatSetUp(A);CHKERRQ(ierr); in main()
63 ierr = PetscFree(v);CHKERRQ(ierr); in main()
75 ierr = MatSetUp(B);CHKERRQ(ierr); in main()
95 ierr = PetscFree(v);CHKERRQ(ierr); in main()
126 ierr = MatSetUp(X);CHKERRQ(ierr); in main()
162 ierr = MatSetUp(G);CHKERRQ(ierr); in main()
177 ierr = MatDestroy(&G);CHKERRQ(ierr); in main()
188 ierr = MatDestroy(&G);CHKERRQ(ierr); in main()
218 ierr = MatSetUp(F);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex70.c | 89 ierr = VecCopy(X,Px);CHKERRQ(ierr); in proj_mult()
95 ierr = VecCopy(Py,Ax);CHKERRQ(ierr); in proj_mult()
97 ierr = VecCopy(Ay,Py);CHKERRQ(ierr); in proj_mult()
103 ierr = VecCopy(Px,Y);CHKERRQ(ierr); in proj_mult()
104 ierr = VecDestroy(&Px);CHKERRQ(ierr); in proj_mult()
105 ierr = VecDestroy(&Py);CHKERRQ(ierr); in proj_mult()
106 ierr = VecDestroy(&Ax);CHKERRQ(ierr); in proj_mult()
107 ierr = VecDestroy(&Ay);CHKERRQ(ierr); in proj_mult()
139 ierr = MatSetUp(PtAP);CHKERRQ(ierr); in MyPtShellPMultNumeric()
227 ierr = PetscInitialize(&argc,&args,NULL,help);if (ierr) return ierr; in main()
[all …]
|
| H A D | ex245.c | 20 ierr = PetscInitialize(&argc,&argv,(char*) 0,help);if (ierr) return ierr; in main()
41 ierr = MatSetUp(A);CHKERRQ(ierr); in main()
60 ierr = ISDestroy(&isrows);CHKERRQ(ierr); in main()
61 ierr = ISDestroy(&iscols);CHKERRQ(ierr); in main()
62 ierr = PetscFree(v);CHKERRQ(ierr); in main()
74 ierr = MatSetUp(B);CHKERRQ(ierr); in main()
94 ierr = PetscFree(v);CHKERRQ(ierr); in main()
151 ierr = MatDestroy(&G);CHKERRQ(ierr); in main()
162 ierr = MatDestroy(&G);CHKERRQ(ierr); in main()
191 ierr = VecCopy(x,d);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex23.c | 33 ierr = PetscInitialize(&argc,&args,(char*)0,help);if (ierr) return ierr; in main()
48 ierr = MatSetType(A,MATIS);CHKERRQ(ierr); in main()
53 ierr = ISDestroy(&is);CHKERRQ(ierr); in main()
61 ierr = ISDestroy(&is);CHKERRQ(ierr); in main()
113 ierr = MatView(A,NULL);CHKERRQ(ierr); in main()
120 ierr = MatSetUp(B);CHKERRQ(ierr); in main()
162 ierr = MatDestroy(&A2);CHKERRQ(ierr); in main()
163 ierr = MatDestroy(&B2);CHKERRQ(ierr); in main()
239 ierr = VecCopy(x,y);CHKERRQ(ierr); in main()
249 ierr = VecDestroy(&x);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex221.c | 16 ierr = MatShellGetContext(A,&user);CHKERRQ(ierr); in MatGetDiagonal_User()
17 ierr = MatGetDiagonal(user->B,X);CHKERRQ(ierr); in MatGetDiagonal_User()
27 ierr = MatShellGetContext(A,&user);CHKERRQ(ierr); in MatMult_User()
28 ierr = MatMult(user->B,X,Y);CHKERRQ(ierr); in MatMult_User()
85 ierr = PetscInitialize(&argc,&args,(char*)0,help);if (ierr) return ierr; in main()
144 ierr = ISDestroy(&r);CHKERRQ(ierr); in main()
145 ierr = ISDestroy(&c);CHKERRQ(ierr); in main()
146 ierr = MatDestroy(&A);CHKERRQ(ierr); in main()
159 ierr = PetscNew(&user);CHKERRQ(ierr); in main()
455 ierr = MatDestroy(&A);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex94.c | 47 ierr = PetscInitialize(&argc,&args,(char*)0,help);if (ierr) return ierr; in main()
80 ierr = MatLoad(B,viewer);CHKERRQ(ierr); in main()
114 ierr = MatDestroy(&A);CHKERRQ(ierr); in main()
136 ierr = MatDestroy(&C);CHKERRQ(ierr); in main()
141 ierr = MatDestroy(&C);CHKERRQ(ierr); in main()
148 ierr = MatDestroy(&C);CHKERRQ(ierr); in main()
153 ierr = MatDestroy(&C);CHKERRQ(ierr); in main()
158 ierr = MatDestroy(&C);CHKERRQ(ierr); in main()
178 ierr = MatDestroy(&A);CHKERRQ(ierr); in main()
183 ierr = MatDestroy(&C);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex68.c | 16 ierr = PetscInitialize(&argc,&argv,(char*)0,help);if (ierr) return ierr; in main()
23 ierr = MatSetFromOptions(mat);CHKERRQ(ierr); in main()
24 ierr = MatSetUp(mat);CHKERRQ(ierr); in main()
51 ierr = MatView(B,viewer);CHKERRQ(ierr); in main()
52 ierr = MatDestroy(&B);CHKERRQ(ierr); in main()
57 ierr = MatView(B,viewer);CHKERRQ(ierr); in main()
62 ierr = MatDestroy(&B);CHKERRQ(ierr); in main()
71 ierr = MatDestroy(&B);CHKERRQ(ierr); in main()
81 ierr = MatDestroy(&B);CHKERRQ(ierr); in main()
94 ierr = MatDestroy(&B);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex1.c | 23 ierr = PetscInitialize(&argc,&argv,(char*) 0,help);if (ierr) return ierr; in main()
52 ierr = MatSetUp(mat);CHKERRQ(ierr); in main()
74 ierr = VecSet(x,value);CHKERRQ(ierr); in main()
85 ierr = MatMult(mat,x,b);CHKERRQ(ierr); in main()
109 ierr = MatDestroy(&F);CHKERRQ(ierr); in main()
118 ierr = MatSolve(F,b,y);CHKERRQ(ierr); in main()
124 ierr = MatDestroy(&F);CHKERRQ(ierr); in main()
167 ierr = MatDestroy(&F);CHKERRQ(ierr); in main()
172 ierr = VecDestroy(&x);CHKERRQ(ierr); in main()
173 ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/mat/interface/ |
| H A D | dlregismat.c | 56 ierr = MatSolverTypeDestroy();CHKERRQ(ierr); in MatFinalizePackage()
59 ierr = PetscFree(names->rname);CHKERRQ(ierr); in MatFinalizePackage()
60 ierr = PetscFree(names->sname);CHKERRQ(ierr); in MatFinalizePackage()
61 ierr = PetscFree(names->mname);CHKERRQ(ierr); in MatFinalizePackage()
62 ierr = PetscFree(names);CHKERRQ(ierr); in MatFinalizePackage()
172 ierr = MatRegisterAll();CHKERRQ(ierr); in MatInitializePackage()
173 ierr = MatOrderingRegisterAll();CHKERRQ(ierr); in MatInitializePackage()
174 ierr = MatColoringRegisterAll();CHKERRQ(ierr); in MatInitializePackage()
176 ierr = MatCoarsenRegisterAll();CHKERRQ(ierr); in MatInitializePackage()
177 ierr = MatSeqAIJRegisterAll();CHKERRQ(ierr); in MatInitializePackage()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/vec/is/sf/tests/ |
| H A D | ex1.c | 71 ierr = PetscInitialize(&argc,&argv,NULL,help);if (ierr) return ierr; in main()
76 ierr = PetscSFDestroy(&sf);CHKERRQ(ierr); in main()
80 ierr = PetscSFReset(sf);CHKERRQ(ierr); in main()
82 ierr = PetscSFDestroy(&sf);CHKERRQ(ierr); in main()
94 ierr = PetscSFReset(sf);CHKERRQ(ierr); in main()
101 ierr = PetscSFReset(sf);CHKERRQ(ierr); in main()
109 ierr = PetscSFReset(sf);CHKERRQ(ierr); in main()
118 ierr = PetscSFSetUp(sf);CHKERRQ(ierr); in main()
125 ierr = PetscSFSetUp(sf);CHKERRQ(ierr); in main()
126 ierr = PetscSFReset(sf);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex3.c | 21 ierr = PetscInitialize(&argc,&argv,(char*)0,help);if (ierr) return ierr; in main()
34 ierr = VecSetFromOptions(x);CHKERRQ(ierr); in main()
44 ierr = VecAssemblyBegin(x);CHKERRQ(ierr); in main()
45 ierr = VecAssemblyEnd(x);CHKERRQ(ierr); in main()
66 ierr = VecScale(y,2);CHKERRQ(ierr); in main()
80 ierr = VecDestroy(&gy2);CHKERRQ(ierr); in main()
83 ierr = VecDestroy(&y2);CHKERRQ(ierr); in main()
86 ierr = VecDestroy(&y);CHKERRQ(ierr); in main()
121 ierr = VecScale(y,2);CHKERRQ(ierr); in main()
143 ierr = VecDestroy(&y2);CHKERRQ(ierr); in main()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/dm/interface/ |
| H A D | dlregisdmdm.c | 25 ierr = PetscFunctionListDestroy(&DMList);CHKERRQ(ierr); in DMFinalizePackage()
67 ierr = DMRegisterAll();CHKERRQ(ierr); in DMInitializePackage()
141 ierr = DMPlexGenerateRegisterAll();CHKERRQ(ierr); in DMInitializePackage()
196 ierr = PetscSpaceRegisterAll();CHKERRQ(ierr); in PetscFEInitializePackage()
197 ierr = PetscDualSpaceRegisterAll();CHKERRQ(ierr); in PetscFEInitializePackage()
198 ierr = PetscFERegisterAll();CHKERRQ(ierr); in PetscFEInitializePackage()
270 ierr = PetscFVRegisterAll();CHKERRQ(ierr); in PetscFVInitializePackage()
337 ierr = PetscDSRegisterAll();CHKERRQ(ierr); in PetscDSInitializePackage()
370 ierr = AOInitializePackage();CHKERRQ(ierr); in PetscDLLibraryRegister_petscdm()
372 ierr = DMInitializePackage();CHKERRQ(ierr); in PetscDLLibraryRegister_petscdm()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/ksp/ksp/tests/ |
| H A D | ex11.c | 33 ierr = MatDestroy(&A11);CHKERRQ(ierr); in replace_submats()
34 ierr = MatDestroy(&A12);CHKERRQ(ierr); in replace_submats()
35 ierr = MatDestroy(&A21);CHKERRQ(ierr); in replace_submats()
36 ierr = MatDestroy(&A22);CHKERRQ(ierr); in replace_submats()
37 ierr = MatDestroy(&nA11);CHKERRQ(ierr); in replace_submats()
38 ierr = MatDestroy(&nA12);CHKERRQ(ierr); in replace_submats()
39 ierr = MatDestroy(&nA21);CHKERRQ(ierr); in replace_submats()
40 ierr = MatDestroy(&nA22);CHKERRQ(ierr); in replace_submats()
134 ierr = VecDestroy(&f);CHKERRQ(ierr); in LoadTestMatrices()
135 ierr = VecDestroy(&h);CHKERRQ(ierr); in LoadTestMatrices()
[all …]
|
| H A D | ex30.c | 47 ierr = PetscInitialize(&argc,&args,(char*)0,help);if (ierr) return ierr; in main()
101 ierr = MatLoad(A,fd);CHKERRQ(ierr); in main()
109 ierr = VecLoad(b,fd);CHKERRQ(ierr); in main()
117 ierr = VecSet(b,1.0);CHKERRQ(ierr); in main()
129 ierr = MatDestroy(&B);CHKERRQ(ierr); in main()
193 ierr = VecSet(x,0.0);CHKERRQ(ierr); in main()
196 ierr = VecSet(u,1.0);CHKERRQ(ierr); in main()
197 ierr = MatMult(A,u,b);CHKERRQ(ierr); in main()
225 ierr = ISSort(is);CHKERRQ(ierr); in main()
378 ierr = MatDestroy(&A);CHKERRQ(ierr); ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex22.c | 37 ierr = VecDestroy(&diag);CHKERRQ(ierr); in test_solve()
80 ierr = VecSet(f, 1.0);CHKERRQ(ierr); in test_solve()
81 ierr = VecSet(h, 0.0);CHKERRQ(ierr); in test_solve()
114 ierr = VecDestroy(&x);CHKERRQ(ierr); in test_solve()
115 ierr = VecDestroy(&b);CHKERRQ(ierr); in test_solve()
119 ierr = VecDestroy(&f);CHKERRQ(ierr); in test_solve()
120 ierr = VecDestroy(&h);CHKERRQ(ierr); in test_solve()
122 ierr = MatDestroy(&A);CHKERRQ(ierr); in test_solve()
197 ierr = VecSet(f, 1.0);CHKERRQ(ierr); in test_solve_matgetvecs()
198 ierr = VecSet(h, 0.0);CHKERRQ(ierr); in test_solve_matgetvecs()
[all …]
|
| /dports/cad/tochnog/Sources/Tochnog-Latest-jan-2014/ |
| H A D | ksp.c | 110 ierr = MatLoad(A,fd);CHKERRQ(ierr); in main()
123 ierr = VecSet(b,one);CHKERRQ(ierr); in main()
128 ierr = VecLoad(b,fd);CHKERRQ(ierr); in main()
132 ierr = VecLoad(b,fd);CHKERRQ(ierr); in main()
183 ierr = VecGetSize(b,&m);CHKERRQ(ierr); in main()
200 ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
215 ierr = VecSet(x,1.0);CHKERRQ(ierr); in main()
217 ierr = VecSet(x,0.0);CHKERRQ(ierr); in main()
430 ierr = MatDestroy(&A);CHKERRQ(ierr); ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
431 ierr = VecDestroy(&u);CHKERRQ(ierr); ierr = VecDestroy(&x);CHKERRQ(ierr); in main()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/mat/tutorials/ |
| H A D | ex2.c | 21 ierr = PetscInitialize(&argc,&argv,0,help);if (ierr) return ierr; in main()
48 ierr = VecAssemblyEnd(X);CHKERRQ(ierr); in main()
53 ierr = VecAssemblyEnd(Y);CHKERRQ(ierr); in main()
58 ierr = VecAssemblyEnd(Z);CHKERRQ(ierr); in main()
104 ierr = MatMult(A,X,Y);CHKERRQ(ierr); in main()
136 ierr = MatMult(A,X,Y);CHKERRQ(ierr); in main()
160 ierr = PetscFree(a);CHKERRQ(ierr); in main()
161 ierr = PetscFree(b);CHKERRQ(ierr); in main()
162 ierr = PetscFree(x);CHKERRQ(ierr); in main()
163 ierr = PetscFree(y);CHKERRQ(ierr); in main()
[all …]
|
| H A D | ex7.c | 28 ierr = PetscInitialize(&argc, &argv,(char *) 0, help);if (ierr) return ierr; in main()
35 ierr = MatCreate(PETSC_COMM_WORLD, &A);CHKERRQ(ierr); in main()
36 ierr = VecCreate(PETSC_COMM_WORLD, &b);CHKERRQ(ierr); in main()
55 ierr = MatDestroy(&Aself);CHKERRQ(ierr); in main()
56 ierr = VecDestroy(&bself);CHKERRQ(ierr); in main()
84 ierr = PetscInfoDestroy();CHKERRQ(ierr); in main()
144 ierr = PetscInfoDestroy();CHKERRQ(ierr); in main()
164 ierr = PetscFree(filename);CHKERRQ(ierr); in main()
165 ierr = MatDestroy(&A);CHKERRQ(ierr); in main()
166 ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/vec/vec/tests/ |
| H A D | ex37.c | 49 ierr = VecSet(c, 1.0);CHKERRQ(ierr); in test_view()
50 ierr = VecSet(d, 2.0);CHKERRQ(ierr); in test_view()
51 ierr = VecSet(e, 3.0);CHKERRQ(ierr); in test_view()
54 ierr = VecAssemblyEnd(f);CHKERRQ(ierr); in test_view()
55 ierr = VecScale(f, 10.0);CHKERRQ(ierr); in test_view()
70 ierr = VecDestroy(&c);CHKERRQ(ierr); ierr = VecDestroy(&d);CHKERRQ(ierr); in test_view()
86 ierr = VecDestroy(&b);CHKERRQ(ierr); in test_view()
95 ierr = VecDestroy(&X);CHKERRQ(ierr); in test_view()
135 ierr = VecSet(c, 1.0);CHKERRQ(ierr);
136 ierr = VecSet(d, 2.0);CHKERRQ(ierr);
[all …]
|
| H A D | ex41.c | 27 ierr = VecSetType(c, VECMPI);CHKERRQ(ierr); in test_vec_ops()
28 ierr = VecDuplicate(c, &d);CHKERRQ(ierr); in test_vec_ops()
29 ierr = VecDuplicate(c, &e);CHKERRQ(ierr); in test_vec_ops()
30 ierr = VecDuplicate(c, &f);CHKERRQ(ierr); in test_vec_ops()
41 ierr = VecSet(c, 1.0);CHKERRQ(ierr); in test_vec_ops()
42 ierr = VecSet(d, 2.0);CHKERRQ(ierr); in test_vec_ops()
43 ierr = VecSet(e, 3.0);CHKERRQ(ierr); in test_vec_ops()
44 ierr = VecSet(f, 4.0);CHKERRQ(ierr); in test_vec_ops()
45 ierr = VecSet(g, 5.0);CHKERRQ(ierr); in test_vec_ops()
46 ierr = VecSet(h, 6.0);CHKERRQ(ierr); in test_vec_ops()
[all …]
|
| /dports/science/PETSc/petsc-3.14.1/src/ksp/ksp/tutorials/ |
| H A D | ex72.c | 59 ierr = PetscInitialize(&argc,&args,(char*)0,help);if (ierr) return ierr; in main()
113 ierr = MatLoad(A,viewer);CHKERRQ(ierr); in main()
146 ierr = VecSet(b,one);CHKERRQ(ierr); in main()
187 ierr = VecGetSize(b,&m);CHKERRQ(ierr); in main()
204 ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
218 ierr = VecSet(x,1.0);CHKERRQ(ierr); in main()
220 ierr = VecSet(x,0.0);CHKERRQ(ierr); in main()
313 ierr = KSPSetUp(ksp);CHKERRQ(ierr); in main()
434 ierr = MatDestroy(&A);CHKERRQ(ierr); ierr = VecDestroy(&b);CHKERRQ(ierr); in main()
435 ierr = VecDestroy(&u);CHKERRQ(ierr); ierr = VecDestroy(&x);CHKERRQ(ierr); in main()
[all …]
|