Home
last modified time | relevance | path

Searched refs:wk2 (Results 1 – 25 of 114) sorted by relevance

12345

/dports/science/afni/afni-AFNI_21.3.16/src/ptaylor/
H A DLS_funcs.c170 double *wk1, double *wk2, int Nwk, in PR89_fasper() argument
231 wk1[j] = wk2[j] = 0.; in PR89_fasper()
239 PR89_spread(1., wk2, Ndim, Ckk, MACC); in PR89_fasper()
245 mm = gsl_fft_real_radix2_transform(wk2+1, 1, Ndim); in PR89_fasper()
275 hypo = sqrt(wk2[K]*wk2[K]+wk2[KK]*wk2[KK])+0.000001; in PR89_fasper()
277 hc2wt = 0.5*wk2[K]/hypo; in PR89_fasper()
278 hs2wt = -0.5*wk2[KK]/hypo; in PR89_fasper()
281 den = 0.5*N + hc2wt*wk2[K] - hs2wt*wk2[KK]; in PR89_fasper()
287 wk2[j] = (cterm + sterm)/(2.); in PR89_fasper()
291 wk2[j]/= VAR; in PR89_fasper()
H A D3dLombScargle.c308 double *wk1=NULL, *wk2=NULL; in main() local
732 wk2 = (double *)calloc(Npts_wrk, sizeof(double)); in main()
743 (wk1 == NULL) || (wk2 == NULL) || in main()
790 wk1[pp] = wk2[pp] = 0.; in main()
824 wk1-1, wk2-1, Npts_wrk, in main()
833 wk1-1, wk2-1, Npts_wrk, in main()
851 all_ls[l][idx]+= (float) wk2[l]; in main()
1004 if(wk2) in main()
1005 free(wk2); in main()
/dports/japanese/suicavalue/SuicaValue/
H A DSuicaValue.c12 int wk, wk2; in main() local
41 wk2=b[5]>>5; in main()
42 wk2=wk2&0x07; in main()
43 wk=wk+wk2; in main()
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Dcrackrate.f22 & wk1,wk2,wk3,xkeqmin,xkeqmax,dkeq,domstep,domphi, argument
92 & wk1(*),wk2(*),wk3(*), local
110 wk2(i)=0.d0
122 if(dabs(xk2(m,i)).gt.dabs(wk2(i))) wk2(i)=xk2(m,i)
H A Dglobalcrackresults.f19 subroutine globalcrackresults(nfront,ifront,wk1,wk2,wk3,dkeq, argument
30 real*8 wk1(*),wk2(*),wk3(*),dkeq(*),domphi(*),dadn(*), local
46 wk2glob(node)=wk2(i)
/dports/science/kst2/kst-plot-38eddb5322a1d557f9d86ea95d456d76272941e3/src/plugins/dataobject/periodogram/
H A Dperiodogram.cpp561 double wk2[], in FastLombPeriodogram() argument
614 wk2[j] = 0.0; in FastLombPeriodogram()
631 realft(wk2, ndim, 1); in FastLombPeriodogram()
635 hypo = sqrt(wk2[k]*wk2[k] + wk2[k+1]*wk2[k+1]); in FastLombPeriodogram()
636 hc2wt = 0.5 * wk2[k ] / hypo; in FastLombPeriodogram()
637 hs2wt = 0.5 * wk2[k+1] / hypo; in FastLombPeriodogram()
643 den = 0.5*n + hc2wt*wk2[k] + hs2wt*wk2[k+1]; in FastLombPeriodogram()
651 wk2[j] = (cterm + sterm); in FastLombPeriodogram()
653 wk2[j] /= (2.0 * *pvar); in FastLombPeriodogram()
655 if (wk2[j] > pmax) { in FastLombPeriodogram()
[all …]
/dports/cad/ngspice_rework/ngspice-35/src/frontend/trannoise/
H A DFastNorm3.c594 Sf wk1 [WL], wk2 [WL]; /* Pools of variates. */ variable
641 ppt[j] = wk2 + j * VL + top[i]; in regen()
671 printf ("Chunk %1d done. Ptr %1d now %4d\n", i, j, ppt[j]-wk2); in regen()
685 p = wk2[j^m]; j++; in regen()
686 s = wk2[j^m]; j++; in regen()
687 q = wk2[j^m]; j++; in regen()
688 r = wk2[j^m]; j++; in regen()
820 wk1[i] = wk2[i] = 0.0; in initnorm()
/dports/cad/jspice3/jspice3-2.5/examples/
H A Dprocess.mod15 + k2 = -0.020029 lk2 = 0.0197751 wk2 = -0.040038
43 + k2 = -0.020029 lk2 = 0.0197751 wk2 = -0.040038
71 + k2 = 0.14664 lk2 = 0.168585 wk2 = -0.18796
99 + k2 = 0.14664 lk2 = 0.168585 wk2 = -0.18796
127 + k2 = 0.14664 lk2 = 0.168585 wk2 = -0.18796
155 + k2 = 0.14664 lk2 = 0.168585 wk2 = -0.18796
183 + k2 = 0.160163 lk2 = 0.141849 wk2 = -0.20333
211 + k2 = 0.160163 lk2 = 0.141849 wk2 = -0.20333
239 + k2 = 0.14664 lk2 = 0.168585 wk2 = -0.18796
267 + k2 = 0.14664 lk2 = 0.168585 wk2 = -0.18796
/dports/math/R-cran-gss/gss/R/
H A Dssanova.R489 wk2 <- t(t(wk1)/sqrt(val)) functionVar
490 wk2 <- t(wk2)%*%wk2
491 wk2 <- solve(wk2+diag(10^nlambda,dim(wk2)[1]),wk2)
492 wk2 <- (wk2+t(wk2))/2
493 wk2 <- t(wk2/sqrt(val))/sqrt(val)
494 wk2 <- diag(1/val,dim(wk2)[1])-wk2
507 wk1[nnull+(1:rkq),nnull+(1:rkq)] <- wk2
/dports/sysutils/slurm-wlm/slurm-20.02.7/testsuite/expect/
H A Dtest21.2336 set wk2 "test$test_id-wckey2"
341 set saadd_pid [spawn $sacctmgr -i add user $user_name cluster=$cn wckey=$wk,$wk2,$wk3]
377 -ex "\n$wk2\|$cn\|$user_name\|" {
403 set sadel_pid [spawn $sacctmgr -i delete user $user_name wckey=$wk,$wk2,$wk3]
427 -ex "\n$wk2\|$cn\|$user_name\|" {
429 log_error "WCKey = $wk2 should be deleted, but was not"
/dports/math/R-cran-VGAM/VGAM/src/
H A Dmuxr3.c25 double *wk, double *wk2,
29 double *wk2, int *hqipzx3n, int *exz2jrhq,
34 double *wkcc, double *wk2, int *hqipzx3n, int *exz2jrhq,
155 double *wk, double *wk2, in mux5ccc() argument
167 pd2 = wk2; in mux5ccc()
210 double *wk2, int *hqipzx3n, int *exz2jrhq, in mux55ccc() argument
220 pd2 = wk2; in mux55ccc()
229 bpvaqm5z += wk2[yq6lorbx + urohxe6t * *M] * in mux55ccc()
279 double *wkcc, double *wk2, in mux111ccc() argument
306 wk2[ayfnwr1v + yq6lorbx * *M] = *pd2++; in mux111ccc()
[all …]
/dports/devel/efl/efl-1.25.1/src/tests/eina/
H A Deina_test_barrier.c29 static Eina_Thread wk1, wk2, wk3, wk4, wk5; variable
74 r = eina_thread_create(&wk2, EINA_THREAD_NORMAL, -1, wk_func, NULL); in EFL_START_TEST()
90 eina_thread_join(wk2); in EFL_START_TEST()
/dports/science/lammps/lammps-stable_29Sep2021/lib/awpmd/systems/interact/TCP/
H A Dwpmd_split.cpp521 move_to_image(wj2,wk2); in interaction_hartree()
553 o2.set2(wk2,&I02); in interaction_hartree()
747 move_to_image(wj1,wk2); in interaction()
753 o12.set2(wk2,&I012); in interaction()
929 move_to_image(wj1,wk2); in interaction()
938 cVector_3 v1=conj(wj1.b)*wk2.a-wk2.b*conj(wj1.a); in interaction()
940 v-=6.*wk2.a*conj(wj1.a); in interaction()
956 cVector_3 tv=wk2.b*conj(wj1.a)-conj(wj1.b)*wk2.a; in interaction()
959 cdouble dv_aj_conj= -2*wk2.a*(3*wjk12.a*wk2.a-tv*wjk12.b)/ajk3; in interaction()
965 o12.set2(wk2,&I012); in interaction()
[all …]
/dports/science/liggghts/LIGGGHTS-PUBLIC-3.8.0-26-g6e873439/lib/awpmd/systems/interact/TCP/
H A Dwpmd_split.cpp524 move_to_image(wj2,wk2); in interaction_hartree()
556 o2.set2(wk2,&I02); in interaction_hartree()
750 move_to_image(wj1,wk2); in interaction()
756 o12.set2(wk2,&I012); in interaction()
932 move_to_image(wj1,wk2); in interaction()
941 cVector_3 v1=conj(wj1.b)*wk2.a-wk2.b*conj(wj1.a); in interaction()
943 v-=6.*wk2.a*conj(wj1.a); in interaction()
959 cVector_3 tv=wk2.b*conj(wj1.a)-conj(wj1.b)*wk2.a; in interaction()
962 cdouble dv_aj_conj= -2*wk2.a*(3*wjk12.a*wk2.a-tv*wjk12.b)/ajk3; in interaction()
968 o12.set2(wk2,&I012); in interaction()
[all …]
/dports/math/m4ri/m4ri-release-20200125/m4ri/
H A Dmzd.c661 word* RESTRICT wk2 = wk; in _mzd_copy_transpose_lt64x64() local
664 wk2[0] = tk & m; in _mzd_copy_transpose_lt64x64()
665 wk2[j_rowstride_dst] = (tk >> 4) & m; in _mzd_copy_transpose_lt64x64()
672 wk2 += 8 * j_rowstride_dst; in _mzd_copy_transpose_lt64x64()
683 word* RESTRICT wk2 = wk; in _mzd_copy_transpose_lt64x64() local
686 wk2[0] = tk & m; in _mzd_copy_transpose_lt64x64()
690 wk2 += 4 * j_rowstride_dst; in _mzd_copy_transpose_lt64x64()
699 word* RESTRICT wk2 = wk; in _mzd_copy_transpose_lt64x64() local
702 wk2[0] = tk & m; in _mzd_copy_transpose_lt64x64()
703 wk2[rowstride_dst] = (tk >> 1) & m; in _mzd_copy_transpose_lt64x64()
[all …]
/dports/cad/irsim/irsim-9.7.110/lib/calibrate_spice3/
H A Dmosis1_6u.spi13 + k2 = -0.023484 lk2 = 0.00657988 wk2 = 0.0861925
41 + k2 = 0.245245 lk2 = 0.0147686 wk2 = -0.13972
/dports/math/scilab/scilab-6.1.1/scilab/modules/optimization/src/fortran/
H A Dzgcbd.f15 &izs,rzs,dzs,y,s,z,ys,zs,nt,index,wk1,wk2,alg,ialg,nomf)
23 dimension wk1(n),wk2(n),alg(15)
238 call majysa(n,nt,np,y,s,ys,lb,g,x,wk2,wk1,index,ialg,nb)
305 & wk2,epsgcp)
337 call dcopy(n,g,1,wk2,1)
/dports/misc/vxl/vxl-3.3.2/contrib/mul/vil3d/algo/
H A Dvil3d_make_distance_filter.cxx33 double wk2=width_k*width_k; in vil3d_make_distance_filter_r1() local
49 d.push_back(std::sqrt(double(i*i*wi2+j*j*wj2+k*k*wk2))); in vil3d_make_distance_filter_r1()
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/ida/fcmix_openmp/
H A DfidaRoberts_dns_openmp.f214 1 ipar, rpar, wk1, wk2, wk3, djacerr)
223 double precision wk1(*), wk2(*), wk3(*)
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/ida/fcmix_pthreads/
H A DfidaRoberts_dns_pthreads.f214 1 ipar, rpar, wk1, wk2, wk3, djacerr)
223 double precision wk1(*), wk2(*), wk3(*)
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/ida/fcmix_serial/
H A DfidaRoberts_dns.f211 1 ipar, rpar, wk1, wk2, wk3, djacerr)
220 double precision wk1(*), wk2(*), wk3(*)
/dports/math/sundials/sundials-5.7.0/examples/ida/fcmix_openmp/
H A DfidaRoberts_dns_openmp.f214 1 ipar, rpar, wk1, wk2, wk3, djacerr)
223 double precision wk1(*), wk2(*), wk3(*)
/dports/math/sundials/sundials-5.7.0/examples/ida/fcmix_pthreads/
H A DfidaRoberts_dns_pthreads.f214 1 ipar, rpar, wk1, wk2, wk3, djacerr)
223 double precision wk1(*), wk2(*), wk3(*)
/dports/math/sundials/sundials-5.7.0/examples/ida/fcmix_serial/
H A DfidaRoberts_dns.f211 1 ipar, rpar, wk1, wk2, wk3, djacerr)
220 double precision wk1(*), wk2(*), wk3(*)
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/contrib/pseudopotentials/troullier-martins/
H A Datm.f412 2 wk1,wk2,wk3,wk4,wk5,wk6,wk7,wk8,wk9,wkb)
453 call dmixp(vod,vid,xmixo,iiter,3,nr,wk1,wk2,
2050 2 ev,iflag,wk1,wk2,wk3,evi)
2054 2 ev,wk1,wk2,wk3,wk4,evi)
3634 2 vid,viu,ev,iflag,wk1,wk2,wk3,evi)
3638 2 ev,wk1,wk2,wk3,wk4,evi)
4740 2 wk2,wk3,evi)
6253 2 wk2,wk3,evi)
6846 2 vid,viu,ev,iflag,wk1,wk2,wk3,evi)
6850 2 ev,wk1,wk2,wk3,wk4,evi)
[all …]

12345