| /petsc/src/ts/impls/implicit/alpha/ |
| H A D | alpha2.c | 25 Vec V0, Va, V1; member
107 Vec X1 = X, V1 = th->V1, A1 = th->A1; in TSAlpha_StageVecs() local
122 PetscCall(VecWAXPY(V1, (1.0 - Gamma) / Gamma, A0, A1)); in TSAlpha_StageVecs()
123 PetscCall(VecAYPX(V1, dt * Gamma, V0)); in TSAlpha_StageVecs()
128 PetscCall(VecWAXPY(Va, -1.0, V0, V1)); in TSAlpha_StageVecs()
161 Vec V0 = ts->vec_dot, V1, V2 = th->V1; in TSAlpha_Restart() local
166 PetscCall(VecDuplicate(V0, &V1)); in TSAlpha_Restart()
184 PetscCall(VecCopy(th->V1, V1)); in TSAlpha_Restart()
192 PetscCall(VecCopy(V1, th->V0)); in TSAlpha_Restart()
196 PetscCall(VecCopy(th->V1, V2)); in TSAlpha_Restart()
[all …]
|
| H A D | alpha1.c | 24 Vec V0, Va, V1; member
73 Vec X1 = X, V1 = th->V1; in TSAlpha_StageVecs() local
83 PetscCall(VecWAXPY(V1, -1.0, X0, X1)); in TSAlpha_StageVecs()
84 PetscCall(VecAXPBY(V1, 1 - 1 / Gamma, 1 / (Gamma * dt), V0)); in TSAlpha_StageVecs()
89 PetscCall(VecWAXPY(Va, -1.0, V0, V1)); in TSAlpha_StageVecs()
192 PetscCall(VecCopy(th->V1, th->V0)); in TSStep_Alpha()
281 PetscCall(VecWAXPY(th->V1, -1.0, th->X0, ts->vec_sol)); in TSInterpolate_Alpha()
282 PetscCall(VecAXPBY(th->V1, 1 - 1 / Gamma, 1 / (Gamma * ts->time_step), th->V0)); in TSInterpolate_Alpha()
285 PetscCall(VecAXPY(X, th->Gamma * dt, th->V1)); in TSInterpolate_Alpha()
328 PetscCall(VecDestroy(&th->V1)); in TSReset_Alpha()
[all …]
|
| /petsc/share/petsc/matlab/ |
| H A D | laplacian.m | 312 V1 = sin(kron((1:u(1))'*(pi/(u(1)+1)),p1))*(2/(u(1)+1))^0.5; variable
314 V1 = cos(kron((0.5:1:u(1)-0.5)'*(pi/u(1)),p1-1))*(2/u(1))^0.5; variable
315 V1(:,p1==1) = 1/u(1)^0.5;
317 V1 = sin(kron((1:u(1))'*(pi/2/(u(1)+0.5)),2*p1 - 1))... variable
320 V1 = cos(kron((0.5:1:u(1)-0.5)'*(pi/2/(u(1)+0.5)),2*p1 - 1))... variable
323 V1 = zeros(u(1),m); variable
325 V1(:,mod(p1,2)==1) = cos(a*(pi/u(1)*(p1(mod(p1,2)==1)-1)))...
329 V1(:,mod(p1,2)==0) = sin(a*(pi/u(1)*p1(mod(p1,2)==0)))...
332 V1(:,p1==1) = 1/u(1)^0.5;
334 V1(:,p1==u(1)) = V1(:,p1==u(1))/2^0.5;
[all …]
|
| /petsc/src/ksp/ksp/impls/lsqr/ |
| H A D | lsqr.c | 73 Vec X, B, V, V1, U, U1, TMP, W, W2, Z = NULL; in KSPSolve_LSQR() local
94 V1 = lsqr->vwork_n[2]; in KSPSolve_LSQR()
169 PetscCall(KSP_MatMultHermitianTranspose(ksp, Amat, U1, V1)); in KSPSolve_LSQR()
170 PetscCall(VecAXPY(V1, -beta, V)); in KSPSolve_LSQR()
172 PetscCall(VecNorm(V1, NORM_2, &alpha)); in KSPSolve_LSQR()
175 PetscCall(PCApply(ksp->pc, V1, Z)); in KSPSolve_LSQR()
176 PetscCall(VecDotRealPart(V1, Z, &alpha)); in KSPSolve_LSQR()
189 PetscCall(VecScale(V1, 1.0 / alpha)); /* alpha*V1 = Amat^T*U1 - beta*V */ in KSPSolve_LSQR()
209 PetscCall(VecAYPX(W, -theta / rho, V1)); /* w <- v - (theta/rho) w */ in KSPSolve_LSQR()
226 SWAP(V1, V, TMP); in KSPSolve_LSQR()
|
| /petsc/src/vec/vec/tests/output/ |
| H A D | ex30f_1.out | 1 Vec Object: V1 4 MPI processes
|
| /petsc/lib/petsc/bin/maint/abi-compliance-checker/modules/Internals/ |
| H A D | Basic.pm | 273 my ($V1, $V2) = @_;
274 return 0 if($V1 eq $V2);
275 my @V1Parts = split(/\./, $V1);
|
| /petsc/src/tao/pde_constrained/impls/lcl/ |
| H A D | lcl.h | 34 Vec V1; /* Design variable */ member
|
| H A D | lcl.c | 27 PetscCall(VecDestroy(&lclP->V1)); in TaoDestroy_LCL()
140 PetscCall(VecDuplicate(lclP->V, &lclP->V1)); in TaoSetup_LCL()
395 PetscCall(VecCopy(lclP->V, lclP->V1)); in TaoSolve_LCL()
|
| /petsc/share/petsc/datafiles/meshes/ |
| H A D | nozzle.egads | 3 CASCADE Topology V1, (c) Matra-Datavision
|
| /petsc/lib/petsc/bin/maint/abi-compliance-checker/ |
| H A D | abi-compliance-checker.pl | 2918 my ($MemPos, $Type1, $V1, $Type2, $V2) = @_;
2921 my %MemberType_Pure = getPureType($MemberType_Id, $V1);
2936 if($TypeInfo{$V1}{$MemberType_Id}{"Name"} eq $TypeInfo{$V2}{$PairType_Id}{"Name"})
5311 my ($T1, $T2, $V1, $V2) = @_;
5312 $T1 = uncoverTypedefs($T1, $V1);
5331 my ($Old_Value, $New_Value, $V1, $V2, $Qual) = @_;
5332 $Old_Value = uncoverTypedefs($Old_Value, $V1);
6306 my $V1 = $In::Desc{1}{"Version"};
6321 and $V1 ne "X" and $V2 ne "Y")
6324 …$Title .= " between <span style='color:Red;'>".$V1."</span> and <span style='color:Red;'>".$V2."</…
[all …]
|
| /petsc/src/ksp/ksp/impls/minres/ |
| H A D | minres.c | 51 #define KSPMinresSwap3(V1, V2, V3) \ argument
53 Vec T = V1; \
54 V1 = V2; \
|