/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/grid/ |
H A D | grid_integrate.F | 48 INTENT(inout) :: vab local 149 REAL(kind=dp), ALLOCATABLE, DIMENSION(:, :) :: vab local 215 vab = 0.0_dp 245 axpm0 = vab(ico, jco) 320 DEALLOCATE (vab) 810 vab(ico, jco) = vab(ico, jco) + myexp*PRODUCT(drap)*PRODUCT(drbp) 963 axpm0 = vab(coset(ax, ay, az), coset(bx, by, bz)) 964 axp1 = vab(coset(ax + 1, ay, az), coset(bx, by, bz)) 966 ayp1 = vab(coset(ax, ay + 1, az), coset(bx, by, bz)) 968 azp1 = vab(coset(ax, ay, az + 1), coset(bx, by, bz)) [all …]
|
H A D | xyz_to_vab_optimised.F | 349 vab(ico, jco) = vab(ico, jco) + coef_xyz(1) 492 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 0)*alpha_3(0, 0, 0) 503 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 1)*alpha_3(0, 0, 0) 513 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 0)*alpha_3(0, 0, 1) 538 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 0)*alpha_3(1, 0, 0) 549 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 1)*alpha_3(1, 0, 0) 559 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 0)*alpha_3(1, 0, 1) 1797 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 1, 0)*alpha_3(0, 0, 0) 1807 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 0, 0)*alpha_3(0, 1, 0) 1843 vab(ico, jco) = vab(ico, jco) + coef_tyz(lxa, lxb, 1, 0)*alpha_3(1, 0, 0) [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | qs_integrate_potential_low.F | 49 INTENT(inout) :: vab local 161 REAL(kind=dp), ALLOCATABLE, DIMENSION(:, :) :: vab local 260 vab = 0.0_dp 290 axpm0 = vab(ico, jco) 365 DEALLOCATE (vab) 855 vab(ico, jco) = vab(ico, jco) + myexp*PRODUCT(drap)*PRODUCT(drbp) 1008 axpm0 = vab(coset(ax, ay, az), coset(bx, by, bz)) 1009 axp1 = vab(coset(ax + 1, ay, az), coset(bx, by, bz)) 1011 ayp1 = vab(coset(ax, ay + 1, az), coset(bx, by, bz)) 1013 azp1 = vab(coset(ax, ay, az + 1), coset(bx, by, bz)) [all …]
|
/dports/cad/gmsh/gmsh-4.9.2-source/contrib/Netgen/libsrc/csg/ |
H A D | algprim.cpp | 737 vab /= vab.Length(); in Cylinder() 751 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in Cylinder() 755 cxy -= vab(0) * vab(1) / r; in Cylinder() 756 cxz -= vab(0) * vab(2) / r; in Cylinder() 757 cyz -= vab(1) * vab(2) / r; in Cylinder() 794 vab /= vab.Length(); in SetPrimitiveData() 804 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in SetPrimitiveData() 808 cxy -= vab(0) * vab(1) / r; in SetPrimitiveData() 862 vab /= vab.Length(); in Transform() 875 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in Transform() [all …]
|
/dports/science/elmerfem/elmerfem-release-9.0/ElmerGUI/netgen/libsrc/csg/ |
H A D | algprim.cpp | 752 vab /= vab.Length(); in Cylinder() 766 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in Cylinder() 770 cxy -= vab(0) * vab(1) / r; in Cylinder() 771 cxz -= vab(0) * vab(2) / r; in Cylinder() 772 cyz -= vab(1) * vab(2) / r; in Cylinder() 809 vab /= vab.Length(); in SetPrimitiveData() 819 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in SetPrimitiveData() 823 cxy -= vab(0) * vab(1) / r; in SetPrimitiveData() 877 vab /= vab.Length(); in Transform() 890 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in Transform() [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/grid/ |
H A D | xyz_to_vab_optimised.F | 349 vab(ico, jco) = vab(ico, jco)+coef_xyz(1) 492 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 0)*alpha_3(0, 0, 0) 503 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 1)*alpha_3(0, 0, 0) 513 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 0)*alpha_3(0, 0, 1) 538 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 0)*alpha_3(1, 0, 0) 549 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 1)*alpha_3(1, 0, 0) 559 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 0)*alpha_3(1, 0, 1) 1797 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 1, 0)*alpha_3(0, 0, 0) 1807 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 0, 0)*alpha_3(0, 1, 0) 1843 vab(ico, jco) = vab(ico, jco)+coef_tyz(lxa, lxb, 1, 0)*alpha_3(1, 0, 0) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/tools/autotune_grid/xyz_to_vab/ |
H A D | xyz_to_vab_optimised.F | 295 vab(ico,jco)=vab(ico,jco)+coef_xyz(1) 429 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,0,0) 441 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,1)*alpha_3(0,0,0) 452 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,0,1) 480 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(1,0,0) 492 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,1)*alpha_3(1,0,0) 503 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(1,0,1) 1731 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,0,0) 1743 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,1,0)*alpha_3(0,0,0) 1754 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,1,0) [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/tools/autotune_grid/xyz_to_vab/ |
H A D | xyz_to_vab_optimised.F | 295 vab(ico,jco)=vab(ico,jco)+coef_xyz(1) 429 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,0,0) 441 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,1)*alpha_3(0,0,0) 452 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,0,1) 480 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(1,0,0) 492 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,1)*alpha_3(1,0,0) 503 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(1,0,1) 1731 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,0,0) 1743 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,1,0)*alpha_3(0,0,0) 1754 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,0,0)*alpha_3(0,1,0) [all …]
|
/dports/cad/netgen/netgen-6.2.2105/libsrc/csg/ |
H A D | algprim.cpp | 771 vab /= vab.Length(); in Cylinder() 785 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in Cylinder() 789 cxy -= vab(0) * vab(1) / r; in Cylinder() 790 cxz -= vab(0) * vab(2) / r; in Cylinder() 791 cyz -= vab(1) * vab(2) / r; in Cylinder() 828 vab /= vab.Length(); in SetPrimitiveData() 838 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in SetPrimitiveData() 842 cxy -= vab(0) * vab(1) / r; in SetPrimitiveData() 902 vab /= vab.Length(); in Transform() 915 hv = a(0) * vab(0) + a(1) * vab(1) + a(2) * vab(2); in Transform() [all …]
|
/dports/lang/yorick/yorick-y_2_2_04/i/ |
H A D | plato.i | 167 vab= pt_cross(a,b); in pt_solid() 168 sab= sqrt((vab*vab)(sum,..)); in pt_solid() 173 cosa= -(vab*vca)(sum,..)/(sab*sca); in pt_solid() 174 cosb= -(vbc*vab)(sum,..)/(sbc*sab); in pt_solid() 182 vab= pt_cross(a,b); in pt_solid2() 183 sab= sqrt((vab*vab)(sum,..)); in pt_solid2() 191 cosa= -(vab*vca)(sum,..)*da; in pt_solid2() 192 cosb= -(vbc*vab)(sum,..)*db; in pt_solid2() 194 sina= pt_cross(vab,vca); in pt_solid2() 196 sinb= pt_cross(vab,vca); in pt_solid2() [all …]
|
/dports/net/opennx/opennx-0.16/packaging/MacOSX/pkgResources/ |
H A D | InstallationCheck | 23 my @vab = split(/\./, $vb); 24 while ($#vaa < $#vab) { 27 while ($#vab < $#vaa) { 28 push @vab, 0; 32 return -1 if ($_ < $vab[$i]); 33 return 1 if ($_ > $vab[$i]);
|
/dports/devel/erlang-cl/cl-cl-1.2.4/examples/ |
H A D | cc_subdiv.cl | 14 int vab; 303 int vab, out = fi.vab*24; 313 Vab[vab+0] = v1.x; Vab[vab+3] = normal.x; 314 Vab[vab+1] = v1.y; Vab[vab+4] = normal.y; 317 Vab[vab+6] = v2.x; Vab[vab+9] = normal.x; 318 Vab[vab+7] = v2.y; Vab[vab+10] = normal.y; 319 Vab[vab+8] = v2.z; Vab[vab+11] = normal.z; 321 Vab[vab+12] = v3.x; Vab[vab+15] = normal.x; 322 Vab[vab+13] = v3.y; Vab[vab+16] = normal.y; 323 Vab[vab+14] = v3.z; Vab[vab+17] = normal.z; [all …]
|
/dports/audio/libsoxr/soxr-0.1.3-Source/src/ |
H A D | pffft-wrap.c | 39 v4sf * /*RESTRICT*/ vab = (v4sf*)ab; in pffft_zconvolve() local 65 vab[2*i+0] = ar; in pffft_zconvolve() 66 vab[2*i+1] = ai; in pffft_zconvolve() 70 vab[2*i+2] = ar; in pffft_zconvolve() 71 vab[2*i+3] = ai; in pffft_zconvolve() 74 ((v4sf_union*)vab)[0].f[0] = ar*br; in pffft_zconvolve() 75 ((v4sf_union*)vab)[1].f[0] = ai*bi; in pffft_zconvolve()
|
/dports/audio/audacity/audacity-Audacity-3.1.3/lib-src/libsoxr/src/ |
H A D | pffft-wrap.c | 39 v4sf * /*RESTRICT*/ vab = (v4sf*)ab; in pffft_zconvolve() local 65 vab[2*i+0] = ar; in pffft_zconvolve() 66 vab[2*i+1] = ai; in pffft_zconvolve() 70 vab[2*i+2] = ar; in pffft_zconvolve() 71 vab[2*i+3] = ai; in pffft_zconvolve() 74 ((v4sf_union*)vab)[0].f[0] = ar*br; in pffft_zconvolve() 75 ((v4sf_union*)vab)[1].f[0] = ai*bi; in pffft_zconvolve()
|
/dports/biology/jalview/jalview/src/jalview/gui/ |
H A D | AppVarna.java | 71 private AppVarnaBinding vab; field in AppVarna 208 vab.setSelectedIndex(0); in AppVarna() 221 vab = new AppVarnaBinding(); in AppVarna() 401 RNA rna = vab.getSelectedRNA(); in mouseOverSequence() 412 vab.updateSelectedRNA(rna); in mouseOverSequence() 426 RNA rna = vab.getSelectedRNA(); in selection() 457 vab.updateSelectedRNA(rna); in selection() 471 RNA rna = vab.getSelectedRNA(); in onHoverChanged() 508 return vab.getStateInfo(rna); in getStateInfo() 585 return this.vab.getSelectedIndex(); in getSelectedIndex() [all …]
|
/dports/graphics/wings/wings-8d019ebe48/src/ |
H A D | wings_draw_setup.erl | 72 #dlo{vab=Vab} = 201 work(#dlo{vab=#vab{face_vs=none},src_we=#we{fs=Ftab}}=D, St, Attr) -> 204 work(#dlo{vab=#vab{face_fn=none}=Vab}=D, St, Attr) -> 207 work(D#dlo{vab=Vab#vab{face_vs=none}}, St, Attr); 219 smooth(#dlo{vab=#vab{face_vs=none}}=D, St, Attr) -> 221 smooth(D=#dlo{vab=#vab{face_sn=none}}, _St, _) -> 253 D#dlo{vab=Vab}. 281 D#dlo{vab=Vab}. 317 D#dlo{vab=Vab}. 453 vab=#vab{face_map=Fmap0}=Vab}) -> [all …]
|
/dports/biology/molden/molden5.8/ambfor/ |
H A D | bond.f | 171 dimension vab(3) 182 vab(j) = coo(j,ia) - coo(j,ib) 185 if (box) call reddis(vab) 187 rab = vlen(vab) 196 call vscal(vab,3,de) 201 forces(j,ia) = forces(j,ia) + vab(j) 202 forces(j,ib) = forces(j,ib) - vab(j)
|
H A D | angle.f | 464 dimension va(3),vb(3),vc(3),vab(3),vcb(3),vp(3), 488 call vsub(va,vb,vab,3) 492 call reddis(vab) 496 rab2 = vab(1)*vab(1) + vab(2)*vab(2) + vab(3)*vab(3) 500 call crprod(vcb,vab,vp) 503 call impsc(vab,vcb,cosa) 512 call crprod(vab,vp,deda)
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/aobasis/ |
H A D | ai_spin_orbit.F | 78 rac, rbc, rab, vab, ldrr1, ldrr2, rr) argument 84 REAL(KIND=dp), DIMENSION(:, :, :), INTENT(INOUT) :: vab local 117 vab(i, j, 1) = 0.0_dp 118 vab(i, j, 2) = 0.0_dp 119 vab(i, j, 3) = 0.0_dp 184 vab(ma, mb, 1) = f0*(dum1 - dum2) 202 vab(ma, mb, 2) = f0*(dum1 - dum2) 220 vab(ma, mb, 3) = f0*(dum1 - dum2)
|
H A D | ai_elec_field.F | 80 rac, rbc, rab, vab, ldrr1, ldrr2, rr) argument 86 REAL(KIND=dp), DIMENSION(:, :, :), INTENT(INOUT) :: vab local 124 vab(i, j, 1) = 0.0_dp 125 vab(i, j, 2) = 0.0_dp 126 vab(i, j, 3) = 0.0_dp 127 vab(i, j, 4) = 0.0_dp 128 vab(i, j, 5) = 0.0_dp 129 vab(i, j, 6) = 0.0_dp 300 vab(ma, mb, 2) = dumxy !xy 301 vab(ma, mb, 3) = dumxz !xz [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/aobasis/ |
H A D | ai_spin_orbit.F | 78 rac, rbc, rab, vab, ldrr1, ldrr2, rr) argument 84 REAL(KIND=dp), DIMENSION(:, :, :), INTENT(INOUT) :: vab local 117 vab(i, j, 1) = 0.0_dp 118 vab(i, j, 2) = 0.0_dp 119 vab(i, j, 3) = 0.0_dp 184 vab(ma, mb, 1) = f0*(dum1 - dum2) 202 vab(ma, mb, 2) = f0*(dum1 - dum2) 220 vab(ma, mb, 3) = f0*(dum1 - dum2)
|
H A D | ai_elec_field.F | 80 rac, rbc, rab, vab, ldrr1, ldrr2, rr) argument 86 REAL(KIND=dp), DIMENSION(:, :, :), INTENT(INOUT) :: vab local 124 vab(i, j, 1) = 0.0_dp 125 vab(i, j, 2) = 0.0_dp 126 vab(i, j, 3) = 0.0_dp 127 vab(i, j, 4) = 0.0_dp 128 vab(i, j, 5) = 0.0_dp 129 vab(i, j, 6) = 0.0_dp 300 vab(ma, mb, 2) = dumxy !xy 301 vab(ma, mb, 3) = dumxz !xz [all …]
|
/dports/science/xtb/xtb-6.4.1/src/ |
H A D | qmdff.f90 | 366 vab = va-vb 368 rab2 = vab(1)*vab(1) + vab(2)*vab(2) + vab(3)*vab(3) 370 call crprod(vcb,vab,vp) 372 call impsc(vab,vcb,cosa) 390 call crprod(vab,vp,deda) 397 term1(1:3)=ea*damp2ij*dampjk*vab(1:3) 415 vab(1:3) = xyz(1:3,i)-xyz(1:3,j) 418 rij = vab(1)*vab(1) + vab(2)*vab(2) + vab(3)*vab(3) 456 term1(1:3)=et*damp2ij*dampjk*dampkl*vab(1:3) 468 vab(1:3) = xyz(1:3,j)-xyz(1:3,i) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/tools/autotune_grid/ |
H A D | qs_integrate_potential.F | 104 REAL(kind=dp), ALLOCATABLE, DIMENSION(:,:) :: vab local 208 ALLOCATE(vab(ncoset(la_max_local),ncoset(lb_max_local))) 215 vab=0.0_dp 251 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,lya,lyb)*alpha(lzp,lza,lzb,3) 271 vab(ico,jco)=0.0_dp 277 …vab(ico,jco)=vab(ico,jco)+coef_xyz(lxyz)*alpha(lzp,lza,lzb,3)*alpha(lyp,lya,lyb,2)*alpha(lxp,lxa,l… 301 intsum=intsum+vab(ico,jco)*(coset(lxa,lya,lza)+1000*coset(lxb,lyb,lzb))
|
/dports/science/cp2k-data/cp2k-7.1.0/tools/autotune_grid/ |
H A D | qs_integrate_potential.F | 104 REAL(kind=dp), ALLOCATABLE, DIMENSION(:,:) :: vab local 208 ALLOCATE(vab(ncoset(la_max_local),ncoset(lb_max_local))) 215 vab=0.0_dp 251 vab(ico,jco)=vab(ico,jco)+coef_tyz(lxa,lxb,lya,lyb)*alpha(lzp,lza,lzb,3) 271 vab(ico,jco)=0.0_dp 277 …vab(ico,jco)=vab(ico,jco)+coef_xyz(lxyz)*alpha(lzp,lza,lzb,3)*alpha(lyp,lya,lyb,2)*alpha(lxp,lxa,l… 301 intsum=intsum+vab(ico,jco)*(coset(lxa,lya,lza)+1000*coset(lxb,lyb,lzb))
|