| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | petscdt.pxi | 16 …GetData(PetscQuadrature, PetscInt*, PetscInt*, PetscInt*, const PetscReal *[], const PetscReal *[]) 17 …atureSetData(PetscQuadrature, PetscInt, PetscInt, PetscInt, const PetscReal [], const PetscReal []) 22 …tscQuadratureExpandComposite(PetscQuadrature, PetscInt, const PetscReal[], const PetscReal[], Pets… 24 …ode PetscDTLegendreEval(PetscInt, const PetscReal*, PetscInt, const PetscInt*, PetscReal*, PetscRe… 25 PetscErrorCode PetscDTGaussQuadrature(PetscInt, PetscReal, PetscReal, PetscReal*, PetscReal*) 26 …ussLobattoLegendreQuadrature(PetscInt, PetscGaussLobattoLegendreCreateType, PetscReal*, PetscReal*) 27 …de PetscDTReconstructPoly(PetscInt, PetscInt, const PetscReal*, PetscInt, const PetscReal*, PetscR… 28 …PetscErrorCode PetscDTGaussTensorQuadrature(PetscInt, PetscInt, PetscInt, PetscReal, PetscReal, Pe… 29 …PetscErrorCode PetscDTGaussJacobiQuadrature(PetscInt, PetscInt, PetscInt, PetscReal, PetscReal, Pe… 31 …PetscErrorCode PetscDTTanhSinhTensorQuadrature(PetscInt, PetscInt, PetscReal, PetscReal, PetscQuad… [all …]
|
| /petsc/src/tao/leastsquares/impls/pounders/ |
| H A D | pounders.h | 11 PetscReal *Fres; /* (nfmax) */ 12 PetscReal *RES; /* npxm */ 13 PetscReal *work; /* (n) */ 14 PetscReal *work2; /* (n) */ 15 PetscReal *work3; /* (n) */ 16 PetscReal *xmin; /* (n) */ 17 PetscReal *mwork; /* (m) */ 18 PetscReal *Disp; /* nxn */ 19 PetscReal *Fdiff; /* nxm */ 20 PetscReal *H; /* model hessians (mxnxn) */ [all …]
|
| /petsc/include/petsc/private/ |
| H A D | drawimpl.h | 16 PetscErrorCode (*line)(PetscDraw, PetscReal, PetscReal, PetscReal, PetscReal, int); 17 PetscErrorCode (*linesetwidth)(PetscDraw, PetscReal); 18 PetscErrorCode (*linegetwidth)(PetscDraw, PetscReal *); 19 PetscErrorCode (*point)(PetscDraw, PetscReal, PetscReal, int); 20 PetscErrorCode (*pointsetsize)(PetscDraw, PetscReal); 21 PetscErrorCode (*string)(PetscDraw, PetscReal, PetscReal, int, const char[]); 22 PetscErrorCode (*stringvertical)(PetscDraw, PetscReal, PetscReal, int, const char[]); 23 PetscErrorCode (*stringsetsize)(PetscDraw, PetscReal, PetscReal); 24 PetscErrorCode (*stringgetsize)(PetscDraw, PetscReal *, PetscReal *); 25 PetscErrorCode (*setviewport)(PetscDraw, PetscReal, PetscReal, PetscReal, PetscReal); [all …]
|
| H A D | tsimpl.h | 41 PetscErrorCode (*interpolate)(TS, PetscReal, Vec); 42 PetscErrorCode (*evaluatewlte)(TS, NormType, PetscInt *, PetscReal *); 48 PetscErrorCode (*linearstability)(TS, PetscReal, PetscReal, PetscReal *, PetscReal *); 82 PetscErrorCode (*set)(TSTrajectory, TS, PetscInt, PetscReal, Vec); 83 PetscErrorCode (*get)(TSTrajectory, TS, PetscInt, PetscReal *); 100 PetscReal *T; /* Lagrange times (stored) */ 103 PetscReal *TW; /* Lagrange times (workspace) */ 110 PetscReal time; 116 PetscReal time; 150 PetscReal *time_points; /* array of the time span */ [all …]
|
| /petsc/src/tao/unconstrained/impls/nls/ |
| H A D | nlsimpl.h | 51 PetscReal sval; /* Starting perturbation value, default zero */ 53 PetscReal imin; /* Minimum perturbation added during initialization */ 54 PetscReal imax; /* Maximum perturbation added during initialization */ 55 PetscReal imfac; /* Merit function factor during initialization */ 57 PetscReal pmin; /* Minimum perturbation value */ 58 PetscReal pmax; /* Maximum perturbation value */ 59 PetscReal pgfac; /* Perturbation growth factor */ 60 PetscReal psfac; /* Perturbation shrink factor */ 61 PetscReal pmgfac; /* Merit function growth factor */ 62 PetscReal pmsfac; /* Merit function shrink factor */ [all …]
|
| /petsc/src/tao/unconstrained/impls/ntl/ |
| H A D | ntlimpl.h | 32 PetscReal nu1; /* used to compute trust-region radius */ 33 PetscReal nu2; /* used to compute trust-region radius */ 34 PetscReal nu3; /* used to compute trust-region radius */ 35 PetscReal nu4; /* used to compute trust-region radius */ 37 PetscReal omega1; /* factor used for trust-region update */ 38 PetscReal omega2; /* factor used for trust-region update */ 39 PetscReal omega3; /* factor used for trust-region update */ 40 PetscReal omega4; /* factor used for trust-region update */ 41 PetscReal omega5; /* factor used for trust-region update */ 59 PetscReal eta1; /* used to compute trust-region radius */ [all …]
|
| /petsc/include/ |
| H A D | petscdraw.h | 98 static inline int PetscDrawRealToColor(PetscReal value, PetscReal min, PetscReal max) in PetscDrawRealToColor() 117 PETSC_EXTERN PetscErrorCode PetscDrawScalePopup(PetscDraw, PetscReal, PetscReal); 122 PETSC_EXTERN PetscErrorCode PetscDrawPixelToCoordinate(PetscDraw, int, int, PetscReal *, PetscReal … 123 PETSC_EXTERN PetscErrorCode PetscDrawCoordinateToPixel(PetscDraw, PetscReal, PetscReal, int *, int … 125 …ndicatorFunction(PetscDraw, PetscReal, PetscReal, PetscReal, PetscReal, int, PetscErrorCode (*)(vo… 127 PETSC_EXTERN PetscErrorCode PetscDrawLine(PetscDraw, PetscReal, PetscReal, PetscReal, PetscReal, in… 128 PETSC_EXTERN PetscErrorCode PetscDrawArrow(PetscDraw, PetscReal, PetscReal, PetscReal, PetscReal, i… 129 PETSC_EXTERN PetscErrorCode PetscDrawLineSetWidth(PetscDraw, PetscReal); 130 PETSC_EXTERN PetscErrorCode PetscDrawLineGetWidth(PetscDraw, PetscReal *); 153 PETSC_EXTERN PetscErrorCode PetscDrawMarker(PetscDraw, PetscReal, PetscReal, int); [all …]
|
| H A D | petscdt.h | 109 …ata(PetscQuadrature, PetscInt *, PetscInt *, PetscInt *, const PetscReal *[], const PetscReal *[]); 110 …ratureSetData(PetscQuadrature, PetscInt, PetscInt, PetscInt, const PetscReal[], const PetscReal[]); 115 …tscQuadratureExpandComposite(PetscQuadrature, PetscInt, const PetscReal[], const PetscReal[], Pets… 118 …adraturePushForward(PetscQuadrature, PetscInt, const PetscReal[], const PetscReal[], const PetscRe… 120 …e PetscDTLegendreEval(PetscInt, const PetscReal *, PetscInt, const PetscInt *, PetscReal *, PetscR… 121 PETSC_EXTERN PetscErrorCode PetscDTJacobiNorm(PetscReal, PetscReal, PetscInt, PetscReal *); 122 …cDTJacobiEval(PetscInt, PetscReal, PetscReal, const PetscReal *, PetscInt, const PetscInt *, Petsc… 123 …PetscErrorCode PetscDTJacobiEvalJet(PetscReal, PetscReal, PetscInt, const PetscReal[], PetscInt, P… 124 …cErrorCode PetscDTPKDEvalJet(PetscInt, PetscInt, const PetscReal[], PetscInt, PetscInt, PetscReal[… 126 … PetscDTPTrimmedEvalJet(PetscInt, PetscInt, const PetscReal[], PetscInt, PetscInt, PetscInt, Petsc… [all …]
|
| H A D | petscds.h | 30 …const PetscScalar[], const PetscScalar[], const PetscScalar[], PetscReal, const PetscReal[], Petsc… 31 …const PetscScalar[], const PetscScalar[], const PetscScalar[], PetscReal, const PetscReal[], Petsc… 32 …const PetscScalar[], const PetscScalar[], const PetscScalar[], PetscReal, const PetscReal[], Petsc… 33 …const PetscScalar[], const PetscScalar[], const PetscScalar[], PetscReal, const PetscReal[], Petsc… 34 …const PetscScalar[], const PetscScalar[], const PetscScalar[], PetscReal, const PetscReal[], Petsc… 35 …PetscReal, const PetscReal[], PetscInt, const PetscScalar[], PetscScalar[]), PetscInt *, void (***… 36 …PetscReal, const PetscReal[], PetscInt, const PetscScalar[], PetscScalar[]), void (*)(PetscInt, Pe… 37 …PetscReal, const PetscReal[], PetscInt, const PetscScalar[], PetscScalar[]), PetscInt, void (**)(P… 38 …PetscReal, const PetscReal[], PetscInt, const PetscScalar[], PetscScalar[]), PetscInt, void (*)(Pe… 40 …PetscReal, PetscReal, const PetscReal[], PetscInt, const PetscScalar[], PetscScalar[]), PetscInt *… [all …]
|
| H A D | petscts.h | 257 PETSC_EXTERN PetscErrorCode TSMonitor(TS, PetscInt, PetscReal, Vec); 258 PETSC_EXTERN PetscErrorCode TSMonitorSet(TS, PetscErrorCode (*)(TS, PetscInt, PetscReal, Vec, Petsc… 259 …st char[], const char[], const char[], PetscErrorCode (*)(TS, PetscInt, PetscReal, Vec, PetscViewe… 280 PETSC_EXTERN PetscErrorCode TSSetRHSJacobianP(TS, Mat, PetscErrorCode (*)(TS, PetscReal, Vec, Mat, … 281 PETSC_EXTERN PetscErrorCode TSGetRHSJacobianP(TS, Mat *, PetscErrorCode (**)(TS, PetscReal, Vec, Ma… 282 PETSC_EXTERN PetscErrorCode TSComputeRHSJacobianP(TS, PetscReal, Vec, Mat); 283 …tscErrorCode TSSetIJacobianP(TS, Mat, PetscErrorCode (*)(TS, PetscReal, Vec, Vec, PetscReal, Mat, … 284 …ErrorCode TSGetIJacobianP(TS, Mat *, PetscErrorCode (**)(TS, PetscReal, Vec, Vec, PetscReal, Mat, … 285 PETSC_EXTERN PetscErrorCode TSComputeIJacobianP(TS, PetscReal, Vec, Vec, PetscReal, Mat, PetscBool); 286 …) then TSComputeRHSJacobianP()", ) PetscErrorCode TSComputeDRDPFunction(TS, PetscReal, Vec, Vec *); [all …]
|
| H A D | petsclandau.h | 13 PETSC_EXTERN PetscErrorCode DMPlexLandauAddMaxwellians(DM, Vec, PetscReal, PetscReal[], PetscReal[]… 15 PETSC_EXTERN PetscErrorCode DMPlexLandauIFunction(TS, PetscReal, Vec, Vec, Vec, void *); 16 PETSC_EXTERN PetscErrorCode DMPlexLandauIJacobian(TS, PetscReal, Vec, Vec, PetscReal, Mat, Mat, voi… 123 PetscReal radius[LANDAU_MAX_GRIDS]; 124 PetscReal radius_par[LANDAU_MAX_GRIDS]; 125 PetscReal radius_perp[LANDAU_MAX_GRIDS]; 126 PetscReal re_radius; /* RE: radius of refinement along v_perp=0, z>0 */ 127 PetscReal vperp0_radius1; /* RE: radius of refinement along v_perp=0 */ 128 …PetscReal vperp0_radius2; /* RE: radius of refinement along v_perp=0 after origin AMR refinement */ 131 PetscReal sphere_inner_radius_90degree[LANDAU_MAX_GRIDS]; [all …]
|
| /petsc/src/tao/bound/impls/bnk/ |
| H A D | bnk.h | 33 PetscReal fold, f, gnorm, dnorm; 36 PetscReal as_tol; 37 PetscReal as_step; 77 PetscReal sval; /* Starting perturbation value, default zero */ 79 PetscReal imin; /* Minimum perturbation added during initialization */ 80 PetscReal imax; /* Maximum perturbation added during initialization */ 81 PetscReal imfac; /* Merit function factor during initialization */ 83 PetscReal pert; /* Current perturbation value */ 84 PetscReal pmin; /* Minimum perturbation value */ 85 PetscReal pmax; /* Maximum perturbation value */ [all …]
|
| /petsc/src/snes/impls/ngmres/ |
| H A D | snesngmres.h | 19 PetscReal *fnorms; /* the residual norm history */ 20 PetscReal *xnorms; /* the solution norm history */ 29 PetscReal descent_ls_test; /* restart GMRES when X_A -X_M is not a descent direction */ 34 PetscReal gammaA; /* Criterion A residual tolerance */ 35 PetscReal epsilonB; /* Criterion B difference tolerance */ 36 PetscReal deltaB; /* Criterion B residual tolerance */ 37 PetscReal gammaC; /* Restart residual tolerance */ 40 PetscReal andersonBeta; /* Relaxation parameter for Anderson Mixing */ 49 PetscReal *s; /* the singular values */ 50 PetscReal rcond; /* the exit condition */ [all …]
|
| /petsc/src/tao/unconstrained/impls/ntr/ |
| H A D | ntrimpl.h | 15 PetscReal radius; 33 PetscReal eta1; /* used to compute trust-region radius */ 34 PetscReal eta2; /* used to compute trust-region radius */ 35 PetscReal eta3; /* used to compute trust-region radius */ 36 PetscReal eta4; /* used to compute trust-region radius */ 38 PetscReal alpha1; /* factor used for trust-region update */ 39 PetscReal alpha2; /* factor used for trust-region update */ 40 PetscReal alpha3; /* factor used for trust-region update */ 41 PetscReal alpha4; /* factor used for trust-region update */ 42 PetscReal alpha5; /* factor used for trust-region update */ [all …]
|
| /petsc/src/dm/dt/tests/ |
| H A D | ex3.c | 5 static void func1(const PetscReal a[], void *unused, PetscReal *val) in func1() 7 const PetscReal x = a[0]; in func1() 11 static void func2(const PetscReal a[], void *unused, PetscReal *val) in func2() 13 const PetscReal x = a[0]; in func2() 17 static void func3(const PetscReal a[], void *unused, PetscReal *val) in func3() 19 const PetscReal x = a[0]; in func3() 23 static void func4(const PetscReal a[], void *unused, PetscReal *val) in func4() 25 const PetscReal x = a[0]; in func4() 26 const PetscReal u = PetscSqrtReal(2.0 + x * x); in func4() 30 static void func5(const PetscReal a[], void *unused, PetscReal *val) in func5() [all …]
|
| /petsc/src/tao/bound/impls/bncg/ |
| H A D | bncg.h | 20 PetscReal alpha; /* convex ratio in the scalar scaling */ 21 PetscReal hz_theta; 22 PetscReal xi; /* Parameter for KD, DK, and HZ methods. */ 23 PetscReal theta; /* The convex combination parameter in the SSML_Broyden method. */ 24 …PetscReal zeta; /* Another parameter, exclusive to Kou-Dai, modifying the y_k scalar contribution… 25 PetscReal hz_eta, dk_eta; 26 …PetscReal bfgs_scale, dfp_scale; /* Scaling of the bfgs/dfp tau parameter in the bfgs and broyden … 27 PetscReal tau_bfgs, tau_dfp; 28 PetscReal as_step, as_tol, yts, yty, sts; 29 PetscReal f, delta_min, delta_max; [all …]
|
| /petsc/src/sys/classes/draw/impls/null/ |
| H A D | drawnull.c | 3 static PetscErrorCode PetscDrawCoordinateToPixel_Null(PetscDraw draw, PetscReal x, PetscReal y, int… in PetscDrawCoordinateToPixel_Null() 10 …ErrorCode PetscDrawPixelToCoordinate_Null(PetscDraw draw, int i, int j, PetscReal *x, PetscReal *y) in PetscDrawPixelToCoordinate_Null() 17 static PetscErrorCode PetscDrawPoint_Null(PetscDraw draw, PetscReal x, PetscReal y, int c) in PetscDrawPoint_Null() 29 static PetscErrorCode PetscDrawLineGetWidth_Null(PetscDraw draw, PetscReal *width) in PetscDrawLineGetWidth_Null() 32 if (width) *width = (PetscReal)0.01; in PetscDrawLineGetWidth_Null() 36 … PetscErrorCode PetscDrawLine_Null(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Petsc… in PetscDrawLine_Null() 42 …PetscErrorCode PetscDrawArrow_Null(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Petsc… in PetscDrawArrow_Null() 48 …cErrorCode PetscDrawRectangle_Null(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Petsc… in PetscDrawRectangle_Null() 54 …PetscErrorCode PetscDrawEllipse_Null(PetscDraw Win, PetscReal x, PetscReal y, PetscReal a, PetscRe… in PetscDrawEllipse_Null() 60 …scDrawTriangle_Null(PetscDraw draw, PetscReal X1, PetscReal Y_1, PetscReal X2, PetscReal Y2, Petsc… in PetscDrawTriangle_Null() [all …]
|
| /petsc/src/snes/impls/ntrdc/ |
| H A D | ntrdcimpl.h | 11 PetscReal mu; /* used to compute trust region parameter */ 12 PetscReal eta; /* used to compute trust region parameter */ 13 PetscReal delta; /* trust region parameter */ 14 PetscReal delta0; /* used to initialize trust region parameter */ 15 PetscReal delta1; /* used to compute trust region parameter */ 16 PetscReal delta2; /* used to compute trust region parameter */ 17 PetscReal delta3; /* used to compute trust region parameter */ 19 PetscReal deltatol; /* trust region tolerance */ 21 PetscReal eta1; /* Heeho's new TR-dogleg */ 22 PetscReal eta2; /* Heeho's new TR-dogleg */ [all …]
|
| /petsc/src/dm/dt/interface/ |
| H A D | dtprob.c | 25 PetscErrorCode PetscPDFMaxwellBoltzmann1D(const PetscReal x[], const PetscReal unused[], PetscReal … in PetscPDFMaxwellBoltzmann1D() 47 PetscErrorCode PetscCDFMaxwellBoltzmann1D(const PetscReal x[], const PetscReal unused[], PetscReal … in PetscCDFMaxwellBoltzmann1D() 69 PetscErrorCode PetscPDFMaxwellBoltzmann2D(const PetscReal x[], const PetscReal unused[], PetscReal … in PetscPDFMaxwellBoltzmann2D() 91 PetscErrorCode PetscCDFMaxwellBoltzmann2D(const PetscReal x[], const PetscReal unused[], PetscReal … in PetscCDFMaxwellBoltzmann2D() 113 PetscErrorCode PetscPDFMaxwellBoltzmann3D(const PetscReal x[], const PetscReal unused[], PetscReal … in PetscPDFMaxwellBoltzmann3D() 135 PetscErrorCode PetscCDFMaxwellBoltzmann3D(const PetscReal x[], const PetscReal unused[], PetscReal … in PetscCDFMaxwellBoltzmann3D() 157 PetscErrorCode PetscPDFGaussian1D(const PetscReal x[], const PetscReal scale[], PetscReal p[]) in PetscPDFGaussian1D() 159 const PetscReal sigma = scale ? scale[0] : 1.; in PetscPDFGaussian1D() 164 PetscErrorCode PetscCDFGaussian1D(const PetscReal x[], const PetscReal scale[], PetscReal p[]) in PetscCDFGaussian1D() 166 const PetscReal sigma = scale ? scale[0] : 1.; in PetscCDFGaussian1D() [all …]
|
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | land_tensors.h | 16 PETSC_DEVICE_FUNC_DECL static PetscReal polevl_10(PetscReal x, const PetscReal coef[]) in polevl_10() 18 PetscReal ans; in polevl_10() 24 PETSC_DEVICE_FUNC_DECL static PetscReal polevl_9(PetscReal x, const PetscReal coef[]) in polevl_9() 26 PetscReal ans; in polevl_9() 35 PETSC_DEVICE_FUNC_DECL static void ellipticE(PetscReal x, PetscReal *ret) in ellipticE() 38 …static const PetscReal P2[] = {1.53552577301013293365E-4F, 2.50888492163602060990E-3F, 8.687868165… in ellipticE() 40 …static const PetscReal Q2[] = {3.27954898576485872656E-5F, 1.00962792679356715133E-3F, 6.506094899… in ellipticE() 43 …static const PetscReal P2[] = {1.53552577301013293365E-4, 2.50888492163602060990E-3, 8.68786816565… in ellipticE() 45 …static const PetscReal Q2[] = {3.27954898576485872656E-5, 1.00962792679356715133E-3, 6.50609489976… in ellipticE() 54 PETSC_DEVICE_FUNC_DECL static void ellipticK(PetscReal x, PetscReal *ret) in ellipticK() [all …]
|
| /petsc/src/sys/classes/random/tutorials/ |
| H A D | ex2.c | 10 PetscReal r; 11 PetscReal dt; 13 PetscReal *St0; 14 PetscReal *vol; 19 PetscReal mcVal(PetscReal, PetscReal, PetscReal, PetscReal, PetscReal); 20 void exchangeVal(PetscReal *, PetscReal *); 21 PetscReal basketPayoff(PetscReal[], PetscReal[], PetscInt, PetscReal, PetscReal, PetscReal[]); 22 PetscErrorCode stdNormalArray(PetscReal *, PetscInt, PetscRandom); 34 PetscReal r, dt; in main() 37 PetscReal *vol, *St0, x, totalx; in main() [all …]
|
| /petsc/src/ksp/ksp/impls/cg/gltr/ |
| H A D | gltrimpl.h | 23 PetscReal *diag; /* Diagonal part of Lanczos matrix */ 24 PetscReal *offd; /* Off-diagonal part of Lanczos matrix */ 25 PetscReal *alpha; /* Record of alpha values from CG */ 26 PetscReal *beta; /* Record of beta values from CG */ 27 PetscReal *norm_r; /* Record of residual values from CG */ 29 PetscReal *rwork; /* Real workspace for solver computations */ 32 PetscReal radius; 33 PetscReal norm_d; 34 PetscReal e_min; 35 PetscReal o_fcn; [all …]
|
| /petsc/src/tao/complementarity/impls/ssls/ |
| H A D | ssls.h | 54 PetscReal merit; /* merit function value (norm(fischer)) */ 55 PetscReal merit_eqn; 56 PetscReal merit_mu; 58 PetscReal delta; 59 PetscReal rho; 61 PetscReal rtol; /* Solution tolerances */ 62 PetscReal atol; 64 PetscReal identifier; /* Active-set identification */ 67 PetscReal mu_init; /* initial smoothing parameter value */ 68 PetscReal mu; /* smoothing parameter */ [all …]
|
| /petsc/src/sys/objects/ |
| H A D | finit.c | 20 …tscsetmoduleblocknumeric_(PetscReal *, PetscReal *, PetscReal *, PetscReal *, PetscReal *, PetscRe… 66 PetscReal pi = PETSC_PI; in PetscInitializeFortran() 67 PetscReal maxreal = PETSC_MAX_REAL; in PetscInitializeFortran() 68 PetscReal minreal = PETSC_MIN_REAL; in PetscInitializeFortran() 69 PetscReal eps = PETSC_MACHINE_EPSILON; in PetscInitializeFortran() 70 PetscReal seps = PETSC_SQRT_MACHINE_EPSILON; in PetscInitializeFortran() 71 PetscReal small = PETSC_SMALL; in PetscInitializeFortran() 72 PetscReal pinf = PETSC_INFINITY; in PetscInitializeFortran() 73 PetscReal pninf = PETSC_NINFINITY; in PetscInitializeFortran()
|
| /petsc/src/sys/classes/random/impls/curand/ |
| H A D | curand2.cu | 10 public thrust::unary_function<thrust::tuple<PetscReal, size_t>, PetscReal> 13 PetscReal rl, rw; 14 PetscReal il, iw; 24 …__host__ __device__ PetscReal operator()(thrust::tuple<PetscReal, size_t> x) { return thrust::get<… in operator ()() 31 public thrust::unary_function<PetscReal, PetscReal> 34 PetscReal l, w; 36 realscalelw(PetscReal low, PetscReal width) : l(low), w(width) { } in realscalelw() 38 __host__ __device__ PetscReal operator()(PetscReal x) { return x * w + l; } in operator ()() 41 PETSC_INTERN PetscErrorCode PetscRandomCurandScale_Private(PetscRandom r, size_t n, PetscReal *val,… in PetscRandomCurandScale_Private() 47 thrust::device_ptr<PetscReal> pval = thrust::device_pointer_cast(val); in PetscRandomCurandScale_Private() [all …]
|