| /petsc/src/vec/vec/impls/seq/ftn-kernels/ |
| H A D | fmdot.F90 | 10 PetscScalar, intent(inout) :: sum1, sum2, sum3, sum4
23 sum1 = sum1 + x(i)*PetscConj(y1(i))
33 PetscScalar, intent(inout) :: sum1, sum2, sum3
45 sum1 = sum1 + x(i)*PetscConj(y1(i))
54 PetscScalar, intent(inout) :: sum1, sum2
65 sum1 = sum1 + x(i)*PetscConj(y1(i))
73 PetscScalar, intent(inout) :: sum1
83 sum1 = sum1 + x(i)*PetscConj(y1(i))
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | inode.c | 375 PetscScalar sum1, sum2, sum3, sum4, sum5, tmp0, tmp1; in MatMult_SeqAIJ_Inode() local
394 sum1 = 0.; in MatMult_SeqAIJ_Inode()
402 sum1 += v1[0] * tmp0 + v1[1] * tmp1; in MatMult_SeqAIJ_Inode()
408 sum1 += *v1++ * tmp0; in MatMult_SeqAIJ_Inode()
410 y[row++] = sum1; in MatMult_SeqAIJ_Inode()
413 sum1 = 0.; in MatMult_SeqAIJ_Inode()
423 sum1 += v1[0] * tmp0 + v1[1] * tmp1; in MatMult_SeqAIJ_Inode()
430 sum1 += *v1++ * tmp0; in MatMult_SeqAIJ_Inode()
433 y[row++] = sum1; in MatMult_SeqAIJ_Inode()
439 sum1 = 0.; in MatMult_SeqAIJ_Inode()
[all …]
|
| /petsc/src/vec/vec/impls/seq/ |
| H A D | dvec2.c | 14 PetscScalar sum0 = 0., sum1 = 0., sum2 = 0., sum3; in VecMDot_Seq() local
25 fortranmdot3_(x, yy0, yy1, yy2, &n, &sum0, &sum1, &sum2); in VecMDot_Seq()
30 z[1] = sum1; in VecMDot_Seq()
36 fortranmdot2_(x, yy0, yy1, &n, &sum0, &sum1); in VecMDot_Seq()
40 z[1] = sum1; in VecMDot_Seq()
57 sum1 = 0.; in VecMDot_Seq()
64 fortranmdot4_(x, yy0, yy1, yy2, yy3, &n, &sum0, &sum1, &sum2, &sum3); in VecMDot_Seq()
71 z[1] = sum1; in VecMDot_Seq()
87 PetscScalar sum0 = 0.0, sum1 = 0.0, sum2 = 0.0, sum3, x0, x1, x2, x3; in VecMDot_Seq() local
107 sum1 += x2 * PetscConj(yy1[2]); in VecMDot_Seq()
[all …]
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij2.c | 284 PetscScalar *z = NULL, sum1, sum2, *zarray; in MatMult_SeqBAIJ_2() local
311 sum1 = 0.0; in MatMult_SeqBAIJ_2()
319 sum1 += v[0] * x1 + v[2] * x2; in MatMult_SeqBAIJ_2()
324 z[0] = sum1; in MatMult_SeqBAIJ_2()
337 PetscScalar *z = NULL, sum1, sum2, sum3, x1, x2, x3, *zarray; in MatMult_SeqBAIJ_3() local
367 sum1 = 0.0; in MatMult_SeqBAIJ_3()
378 sum1 += v[0] * x1 + v[3] * x2 + v[6] * x3; in MatMult_SeqBAIJ_3()
384 z[0] = sum1; in MatMult_SeqBAIJ_3()
398 PetscScalar *z = NULL, sum1, sum2, sum3, sum4, x1, x2, x3, x4, *zarray; in MatMult_SeqBAIJ_4() local
424 sum1 = 0.0; in MatMult_SeqBAIJ_4()
[all …]
|
| /petsc/src/tao/leastsquares/tutorials/matlab/more_wild_probs/ |
| H A D | dfovec.m | 203 sum1 = -(n+1); variable
206 sum1 = sum1 + x(j); variable
210 fvec(i) = x(i) + sum1;
|
| H A D | g_dfovec_1d.m | 538 sum1= -tmp_dfovec_1d_00071; variable
539 g_sum1= zeros(size(sum1));
546 tmp_dfovec_1d_00199= sum1+ tmp_x_00053;
547 % Update detected: sum1= some_expression(sum1,...)
549 sum1= tmp_dfovec_1d_00199; variable
563 fvec(i)= tmp_x_00055+ sum1;
|
| /petsc/src/snes/tutorials/ |
| H A D | ex69.c | 199 PetscReal sum1, sum2, sum3, sum4, sum5, sum6; in SolKxSolution() local
239 sum1 = 0.0; in SolKxSolution()
636 sum1 += u1; in SolKxSolution()
651 vel[0] = sum1; in SolKxSolution()
766 PetscReal sum1 = 0.0, sum2 = 0.0, sum3 = 0.0, sum4 = 0.0, sum5 = 0.0, sum6 = 0.0; in SolCxSolution() local
2945 sum1 += u1; in SolCxSolution()
2956 vel[0] = sum1; in SolCxSolution()
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex43-solcx.h | 8 PetscReal sum1, sum2, sum3, sum4, sum5, sum6, x, z, xc; in evaluate_solCx() local
64 sum1 = 0.0; in evaluate_solCx()
2234 sum1 += u1; in evaluate_solCx()
2244 vel[0] = sum1; in evaluate_solCx()
|