| /dports/science/elk/elk-7.2.42/src/ |
| H A D | gendmatk.f90 | 72 call wavefmt(lradstp,ias,ngp(jspn),apwalm(:,:,:,ias,jspn), &
83 call wavefmt(lradstp,ias,ngp,apwalm(:,:,:,ias,1),evecfv(:,j,1),wfmt2)
|
| H A D | zpotcoul.f90 | 161 do ig=1,ngp
197 do ig=1,ngp
233 do ig=1,ngp
|
| H A D | eveqnfv.f90 | 68 call eveqnfvr(nmatp,ngp,vpc,h,o,evalfv,evecfv)
|
| H A D | genjlgprmt.f90 | 38 do ig=1,ngp
|
| H A D | dmatch.f90 | 22 do igp=1,ngp
|
| H A D | gensfacgp.f90 | 39 do igp=1,ngp
|
| /dports/science/qbox/qbox-public-rel1_73_3/src/ |
| H A D | TorsionConstraint.cpp | 113 const double ngp = g1p*g1p + g2p*g2p + g3p*g3p + g4p*g4p; in enforce_r() local
114 assert(ngp>=0.0); in enforce_r()
123 if ( ngp == 0.0 ) in enforce_r()
137 ng = ngp; in enforce_r()
143 if ( ngp == 0.0 ) in enforce_r()
157 const double sp = ( g1*g1p + g2*g2p + g3*g3p + g4*g4p ) / sqrt( ng * ngp ); in enforce_r()
|
| H A D | DistanceConstraint.cpp | 84 const double ngp = g1p*g1p + g2p*g2p; in enforce_r() local
85 assert(ngp>=0.0); in enforce_r()
89 const double sp = ( g1*g1p + g2*g2p ) / sqrt( ng * ngp ); in enforce_r()
|
| /dports/science/PETSc/petsc-3.14.1/src/ksp/ksp/tutorials/ |
| H A D | ex42.c | 226 *ngp = 8; in ConstructGaussQuadrature3D()
447 PetscInt ngp; in FormStressOperatorQ13D() local
460 for (p = 0; p < ngp; p++) { in FormStressOperatorQ13D()
514 PetscInt ngp; in FormGradientOperatorQ13D() local
526 for (p = 0; p < ngp; p++) { in FormGradientOperatorQ13D()
566 PetscInt ngp; in FormStabilisationOperatorQ13D() local
578 for (p = 0; p < ngp; p++) { in FormStabilisationOperatorQ13D()
624 PetscInt ngp; in FormScaledMassMatrixOperatorQ13D() local
682 PetscInt ngp; in FormMomentumRhsQ13D() local
710 PetscInt ngp; in FormContinuityRhsQ13D() local
[all …]
|
| H A D | ex70.c | 105 *ngp = 4; in CreateGaussQuadrature()
147 PetscInt p,i,j,k,ngp; in BForm_DivT() local
153 for (p = 0; p < ngp; p++) { in BForm_DivT()
191 PetscInt p,i,j,di,ngp; in BForm_Grad() local
197 for (p = 0; p < ngp; p++) { in BForm_Grad()
239 PetscInt p,i,j,ngp; in BForm_Stabilisation() local
245 for (p = 0; p < ngp; p++) { in BForm_Stabilisation()
275 PetscInt p,i,j,ngp; in BForm_ScaledMassMatrix() local
281 for (p = 0; p < ngp; p++) { in BForm_ScaledMassMatrix()
311 PetscInt p,i,ngp; in LForm_MomentumRHS() local
[all …]
|
| H A D | ex43.c | 180 *ngp = 4; in ConstructGaussQuadrature()
471 PetscInt ngp; in FormStressOperatorQ1() local
483 for (p = 0; p < ngp; p++) { in FormStressOperatorQ1()
518 PetscInt ngp; in FormGradientOperatorQ1() local
530 for (p = 0; p < ngp; p++) { in FormGradientOperatorQ1()
570 PetscInt ngp; in FormStabilisationOperatorQ1() local
582 for (p = 0; p < ngp; p++) { in FormStabilisationOperatorQ1()
609 PetscInt ngp; in FormScaledMassMatrixOperatorQ1() local
648 PetscInt ngp; in FormMomentumRhsQ1() local
984 PetscInt ngp; in DMDAIntegrateErrors() local
[all …]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/pspw/lib/psp/ |
| H A D | psp_stress.F | 639 integer ngp(3)
696 > ngp,unita,
721 if ( (ngp(1).ne.control_ngrid(1)) .or.
722 > (ngp(2).ne.control_ngrid(2)) .or.
723 > (ngp(3).ne.control_ngrid(3)) .or.
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/pspw/lib/psp/ |
| H A D | psp_stress.F | 639 integer ngp(3)
696 > ngp,unita,
721 if ( (ngp(1).ne.control_ngrid(1)) .or.
722 > (ngp(2).ne.control_ngrid(2)) .or.
723 > (ngp(3).ne.control_ngrid(3)) .or.
|
| /dports/science/cdo/cdo-2.0.0/src/ |
| H A D | expr_fun.h | 13 void fld_field_init(Field &field, size_t nmiss, double missval, size_t ngp, double *array, double *…
|
| H A D | hetaeta.h | 5 void hetaeta(bool ltq, int ngp, const int *imiss, int nlev1, const double *ah1, const double *bh1, …
|
| /dports/games/libretro-beetle_ngp/ |
| H A D | .license-catalog.mk | 5 _LICENSE_DISTFILES=libretro-beetle-ngp-libretro-0.20210214-74cc0d8_GH0.tar.gz
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | atom_kind_orbitals.F | 202 ngp = agrid%nr
205 ngp = 400
209 CALL create_grid_atom(grid, ngp, 1, 1, 0, quadtype)
210 grid%nr = ngp
663 ngp = 400
666 CALL create_grid_atom(grid, ngp, 1, 1, 0, quadtype)
667 grid%nr = ngp
843 ngp, nj, nn, nr, ns, nset, nsgf, & local
927 ngp = 400
930 CALL create_grid_atom(grid, ngp, 1, 1, 0, quadtype)
[all …]
|
| H A D | pair_potential.F | 80 INTEGER :: handle, i, j, k, ngp local
86 ngp = 0
91 ngp = ngp + COUNT(pot%type == gp_type)
94 CALL initf(ngp)
95 ngp = 0
101 ngp = ngp + 1
102 pot%set(k)%gp%myid = ngp
103 CALL parsef(ngp, TRIM(pot%set(k)%gp%potential), pot%set(k)%gp%parameters)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | atom_kind_orbitals.F | 202 ngp = agrid%nr
205 ngp = 400
209 CALL create_grid_atom(grid, ngp, 1, 1, 0, quadtype)
210 grid%nr = ngp
663 ngp = 400
666 CALL create_grid_atom(grid, ngp, 1, 1, 0, quadtype)
667 grid%nr = ngp
843 ngp, nj, nn, nr, ns, nset, nsgf, & local
927 ngp = 400
930 CALL create_grid_atom(grid, ngp, 1, 1, 0, quadtype)
[all …]
|
| H A D | pair_potential.F | 80 INTEGER :: handle, i, j, k, ngp local
86 ngp = 0
91 ngp = ngp + COUNT(pot%type == gp_type)
94 CALL initf(ngp)
95 ngp = 0
101 ngp = ngp + 1
102 pot%set(k)%gp%myid = ngp
103 CALL parsef(ngp, TRIM(pot%set(k)%gp%potential), pot%set(k)%gp%parameters)
|
| /dports/math/scilab/scilab-6.1.1/scilab/modules/signal_processing/macros/ |
| H A D | eqfir.sci | 36 ngp=nc*16;
40 delf=sb/ngp;
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/band/lib/cpsp/ |
| H A D | cpsp_stress.F | 678 integer ngp(3)
743 > ngp,unita,
762 if ( (ngp(1).ne.control_ngrid(1)) .or.
763 > (ngp(2).ne.control_ngrid(2)) .or.
764 > (ngp(3).ne.control_ngrid(3)) .or.
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/band/lib/cpsp/ |
| H A D | cpsp_stress.F | 678 integer ngp(3)
743 > ngp,unita,
762 if ( (ngp(1).ne.control_ngrid(1)) .or.
763 > (ngp(2).ne.control_ngrid(2)) .or.
764 > (ngp(3).ne.control_ngrid(3)) .or.
|
| /dports/math/scilab/scilab-6.1.1/scilab/modules/cacsd/src/fortran/ |
| H A D | onface.f | 134 ngp = 2*nq - 3
135 call rootgp(ngp,w(lgp),nbeta,w(lbeta),ierr,w(lw))
|
| /dports/science/octopus/octopus-10.5/src/poisson/ |
| H A D | poisson_fft.F90 | 489 integer :: ix, iy, iz, ixx(3), db(3), k, ngp
508 ngp = 8*db(2)
509 SAFE_ALLOCATE(x(1:ngp))
510 SAFE_ALLOCATE(y(1:ngp))
521 do k = 1, ngp
522 x(k) = (k-1)*(xmax/(ngp-1))
525 call spline_fit(ngp, x, y, cylinder_cutoff_f)
|