/dports/lang/awka/awka-0.7.5/benchmark/ |
H A D | loop.awk | 38 for (wk1 in bWKT) 41 if (ar1!=wk1) 43 if (ar2!=wk1) 45 if (bw1!=wk1&&bw1!=ar1&&bw1!=ar2) 47 if (bw2!=wk1&&bw2!=ar1&&bw2!=ar2) 49 if (bw3!=wk1&&bw3!=ar1&&bw3!=ar2) 51 if (bw4!=wk1&&bw4!=ar1&&bw4!=ar2) 53 … if (ba1!=wk1&&ba1!=ar1&&ba1!=ar2&&ba1!=bw1&&ba1!=bw2&&ba1!=bw3&&ba1!=bw4) 55 … if (ba2!=wk1&&ba2!=ar1&&ba2!=ar2&&ba2!=bw1&&ba2!=bw2&&ba2!=bw3&&ba2!=bw4) 61 if (ba5!=wk1&&ba5!=ar1&&ba5!=ar2&&ba5!=bw1&&ba5!=bw2&&ba5!=bw3&&ba5!=bw4) [all …]
|
H A D | loop.pl | 65 foreach $wk1 (keys %bWKT) { 67 if ($ar1 != $wk1) { #??? 69 if ($ar2 != $wk1) { #??? 71 … if ($bw1 != $wk1 && $bw1 != $ar1 && $bw1 != $ar2) { #??? #??? #??? 73 if ($bw2 != $wk1 && $bw2 != $ar1 && $bw2 != $ar2) { #??? 75 … if ($bw3 != $wk1 && $bw3 != $ar1 && $bw3 != $ar2) { #??? 77 … if ($bw4 != $wk1 && $bw4 != $ar1 && $bw4 != $ar2) { #??? 79 …if ($ba1 != $wk1 && $ba1 != $ar1 && $ba1 != $ar2 && $ba1 != $bw1 && $ba1 != $bw2 && $ba1 != $bw3 &… 81 …if ($ba2 != $wk1 && $ba2 != $ar1 && $ba2 != $ar2 && $ba2 != $bw1 && $ba2 != $bw2 && $ba2 != $bw3… 83 …if ($ba3 != $wk1 && $ba3 != $ar1 && $ba3 != $ar2 && $ba3 != $bw1 && $ba3 != $bw2 && $ba3 != $bw3 … [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/pspw/qmmm/ |
H A D | pspw_2qmmm.F | 1328 wk1 = int_mb(kfrag(1)+w1-1) 1329 nbs = int_mb(nbond(1)+wk1-1) 1330 nas = int_mb(nangle(1)+wk1-1) 1331 ncbs = int_mb(ncbond(1)+wk1-1) 1332 nbm = int_mb(nmbond(1)+wk1-1) 1442 wk1 = int_mb(kfrag(1)+w1-1) 1443 nbs = int_mb(nbond(1)+wk1-1) 1551 integer w1,wk1,ks1 1560 wk1 = int_mb(kfrag(1)+w1-1) 1597 integer w1,wk1,ks1,ns [all …]
|
H A D | pspw_qmmm.F | 1688 wk1 = int_mb(kfrag(1)+w1-1) 1689 nbs = int_mb(nbond(1)+wk1-1) 1690 nas = int_mb(nangle(1)+wk1-1) 1691 ncbs = int_mb(ncbond(1)+wk1-1) 1692 nbm = int_mb(nmbond(1)+wk1-1) 1805 wk1 = int_mb(kfrag(1)+w1-1) 1806 nbs = int_mb(nbond(1)+wk1-1) 2432 integer w1,wk1,ks1 2443 wk1 = int_mb(kfrag(1)+w1-1) 2517 integer w1,wk1,ks1,ns [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/pspw/qmmm/ |
H A D | pspw_2qmmm.F | 1451 wk1 = int_mb(kfrag(1)+w1-1) 1452 nbs = int_mb(nbond(1)+wk1-1) 1453 nas = int_mb(nangle(1)+wk1-1) 1454 ncbs = int_mb(ncbond(1)+wk1-1) 1455 nbm = int_mb(nmbond(1)+wk1-1) 1576 wk1 = int_mb(kfrag(1)+w1-1) 1577 nbs = int_mb(nbond(1)+wk1-1) 1697 integer w1,wk1,ks1 1706 wk1 = int_mb(kfrag(1)+w1-1) 1743 integer w1,wk1,ks1,ns [all …]
|
H A D | pspw_qmmm.F | 1822 wk1 = int_mb(kfrag(1)+w1-1) 1823 nbs = int_mb(nbond(1)+wk1-1) 1824 nas = int_mb(nangle(1)+wk1-1) 1825 ncbs = int_mb(ncbond(1)+wk1-1) 1826 nbm = int_mb(nmbond(1)+wk1-1) 1950 wk1 = int_mb(kfrag(1)+w1-1) 1951 nbs = int_mb(nbond(1)+wk1-1) 2593 integer w1,wk1,ks1 2604 wk1 = int_mb(kfrag(1)+w1-1) 2678 integer w1,wk1,ks1,ns [all …]
|
/dports/cad/ngspice_rework/ngspice-35/src/frontend/trannoise/ |
H A D | FastNorm3.c | 594 Sf wk1 [WL], wk2 [WL]; /* Pools of variates. */ variable 645 ptn = wk1; in regen() 683 ppt[i] = wk1 + i * VL; in regen() 712 ts += wk1[i] * wk1[i]; in renormalize() 716 wk1[i] *= vv; in renormalize() 795 gausssave = wk1; in initnorm() 810 boxmuller (wk1, WL); in initnorm() 820 wk1[i] = wk2[i] = 0.0; in initnorm() 821 wk1[0] = sqrt ((double) WL); in initnorm() 826 if ((fabs (wk1[17] - check17) > 0.00001) || in initnorm() [all …]
|
/dports/science/afni/afni-AFNI_21.3.16/src/ptaylor/ |
H A D | LS_funcs.c | 170 double *wk1, double *wk2, int Nwk, in PR89_fasper() argument 231 wk1[j] = wk2[j] = 0.; in PR89_fasper() 238 PR89_spread(ywin[j], wk1, Ndim, Ck, MACC); in PR89_fasper() 244 mm = gsl_fft_real_radix2_transform(wk1+1, 1, Ndim); in PR89_fasper() 282 cterm = pow((cwt*wk1[K] - swt*wk1[KK]),2)/den; in PR89_fasper() 283 sterm = pow((-cwt*wk1[KK] - swt*wk1[K]),2)/(N-den); in PR89_fasper() 286 wk1[j] = j*DF; in PR89_fasper()
|
H A D | 3dLombScargle.c | 308 double *wk1=NULL, *wk2=NULL; in main() local 731 wk1 = (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() 891 fprintf(fout0,"%.5f\n", wk1[k]); in main() 1002 if(wk1) in main() 1003 free(wk1); in main()
|
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | crackrate.f | 22 & wk1,wk2,wk3,xkeqmin,xkeqmax,dkeq,domstep,domphi, argument 92 & wk1(*),wk2(*),wk3(*), local 109 wk1(i)=0.d0 121 if(dabs(xk1(m,i)).gt.dabs(wk1(i))) wk1(i)=xk1(m,i)
|
H A D | globalcrackresults.f | 19 subroutine globalcrackresults(nfront,ifront,wk1,wk2,wk3,dkeq, argument 30 real*8 wk1(*),wk2(*),wk3(*),dkeq(*),domphi(*),dadn(*), local 45 wk1glob(node)=wk1(i)
|
/dports/math/R-cran-gss/gss/R/ |
H A D | ssanova.R | 485 wk1 <- qr(s) functionVar 486 wk1 <- (qr.qty(wk1,r%*%vec))[-(1:nnull),] 488 else wk1 <- r%*%vec 489 wk2 <- t(t(wk1)/sqrt(val)) 504 wk1 <- matrix(0,nnull+rkq,nnull+rkq) 505 wk1[1:nnull,1:nnull] <- sms 509 wk1 <- z 511 while (wk1[rkw,rkw]<wk1[1,1]*sqrt(.Machine$double.eps)) rkw <- rkw-1 512 wk1[row(wk1)>col(wk1)] <- 0 515 hfac <- wk1 [all …]
|
H A D | mkterm.copu.R | 64 wk1 <- env$combo(idx.wk,nu.wk) functionVar 65 for (k in 1:dim(wk1)[1]) { 68 if (ind%in%wk1[k,]) {
|
H A D | sscden1.R | 191 wk1 <- NULL 193 wk1 <- c(wk1,wk[i,yy[i]==env$rho[[ylab]]$qd.pt]) 194 z <- z*wk1 197 wk1 <- NULL 199 wk1 <- cbind(wk1,wk[,yy[i]==env$rho[[ylab]]$qd.pt]) 200 z <- z*wk1
|
/dports/cad/jspice3/jspice3-2.5/examples/ |
H A D | process.mod | 14 + k1 = 0.595618 lk1 = -0.097957 wk1 = -0.081902 42 + k1 = 0.595618 lk1 = -0.097957 wk1 = -0.081902 70 + k1 = 1.31191 lk1 = 0.323395 wk1 = -0.57698 98 + k1 = 1.31191 lk1 = 0.323395 wk1 = -0.57698 126 + k1 = 1.31191 lk1 = 0.323395 wk1 = -0.57698 154 + k1 = 1.31191 lk1 = 0.323395 wk1 = -0.57698 182 + k1 = 1.3821 lk1 = 0.156889 wk1 = -0.63435 210 + k1 = 1.3821 lk1 = 0.156889 wk1 = -0.63435 238 + k1 = 1.31191 lk1 = 0.323395 wk1 = -0.57698 266 + k1 = 1.31191 lk1 = 0.323395 wk1 = -0.57698
|
/dports/devel/efl/efl-1.25.1/src/tests/eina/ |
H A D | eina_test_barrier.c | 29 static Eina_Thread wk1, wk2, wk3, wk4, wk5; variable 71 r = eina_thread_create(&wk1, EINA_THREAD_NORMAL, -1, wk_func, NULL); in EFL_START_TEST() 88 eina_thread_join(wk1); in EFL_START_TEST()
|
/dports/science/kst2/kst-plot-38eddb5322a1d557f9d86ea95d456d76272941e3/src/plugins/dataobject/periodogram/ |
H A D | periodogram.cpp | 560 double wk1[], in FastLombPeriodogram() argument 613 wk1[j] = 0.0; in FastLombPeriodogram() 626 spread(y[j] - ave, wk1, ndim, ck, (int)MACC); in FastLombPeriodogram() 630 realft(wk1, ndim, 1); in FastLombPeriodogram() 644 cterm = pow(cwt*wk1[k+0] + swt*wk1[k+1], 2.0) / den; in FastLombPeriodogram() 648 sterm = pow(cwt*wk1[k+1] - swt*wk1[k+0], 2.0) / ((double)n - den); in FastLombPeriodogram() 650 wk1[j] = (double)j * df; in FastLombPeriodogram()
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/optimization/src/fortran/ |
H A D | zgcbd.f | 15 &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) 304 call gcp(n,index,ibloc,np,nt,y,s,z,ys,zs,diag,g,dir,wk1, 336 call dcopy(n,x,1,wk1,1) 433 if(abs(x(i)-wk1(i)).gt.epsx(i))go to 806
|
/dports/cad/irsim/irsim-9.7.110/lib/calibrate_spice3/ |
H A D | mosis1_6u.spi | 12 + k1 = 0.493218 lk1 = -0.063134 wk1 = 0.309532 40 + k1 = 1.3137 lk1 = -0.18261 wk1 = -0.12209
|
/dports/science/py-libpysal/libpysal-4.5.1/libpysal/io/iohandlers/ |
H A D | __init__.py | 20 from . import wk1
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/contrib/pseudopotentials/troullier-martins/ |
H A D | atm.f | 412 2 wk1,wk2,wk3,wk4,wk5,wk6,wk7,wk8,wk9,wkb) 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) 4034 call wtrans(ar,r,nr,rab,lo(i),ist,wk1) 4795 call wtrans(arps,r,nr,rab,lo(i),ist,wk1) 5550 call wtrans(ar,r,nr,rab,lo(i),ist,wk1) 6846 2 vid,viu,ev,iflag,wk1,wk2,wk3,evi) 6850 2 ev,wk1,wk2,wk3,wk4,evi) [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/contrib/pseudopotentials/troullier-martins/ |
H A D | atm.f | 412 2 wk1,wk2,wk3,wk4,wk5,wk6,wk7,wk8,wk9,wkb) 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) 4034 call wtrans(ar,r,nr,rab,lo(i),ist,wk1) 4795 call wtrans(arps,r,nr,rab,lo(i),ist,wk1) 5550 call wtrans(ar,r,nr,rab,lo(i),ist,wk1) 6846 2 vid,viu,ev,iflag,wk1,wk2,wk3,evi) 6850 2 ev,wk1,wk2,wk3,wk4,evi) [all …]
|
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/ida/fcmix_openmp/ |
H A D | fidaRoberts_dns_openmp.f | 214 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 D | fidaRoberts_dns_pthreads.f | 214 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 D | fidaRoberts_dns.f | 211 1 ipar, rpar, wk1, wk2, wk3, djacerr) 220 double precision wk1(*), wk2(*), wk3(*)
|