/dports/math/jags/JAGS-4.3.0/src/lib/function/ |
H A D | VectorLogDensity.cc | 12 dist->npar() + 1), in VectorLogDensity() 28 unsigned int npar = _dist->npar(); in evaluate() local 30 vector<double const *> dargs(npar); in evaluate() 31 vector<unsigned int > dlengths(npar); in evaluate() 32 for (unsigned int i = 0; i < npar; ++i) { in evaluate() 45 unsigned int npar = _dist->npar(); in checkParameterLength() local 47 vector<unsigned int> dlengths(npar); in checkParameterLength() 66 unsigned int npar = _dist->npar(); in checkParameterValue() local 68 vector<bool> mask(npar); in checkParameterValue() 81 vector<double const *> dargs(npar); in checkParameterValue() [all …]
|
H A D | ArrayLogDensity.cc | 13 dist->npar() + 1), in ArrayLogDensity() 29 unsigned int npar = _dist->npar(); in evaluate() local 31 vector<double const *> dargs(npar); in evaluate() 32 vector<vector<unsigned int> > ddims(npar); in evaluate() 33 for (unsigned int i = 0; i < npar; ++i) { in evaluate() 48 unsigned int npar = _dist->npar(); in checkParameterDim() local 50 vector<vector<unsigned int> > ddim(npar); in checkParameterDim() 51 for (unsigned int i = 0; i < npar; ++i) { in checkParameterDim() 69 unsigned int npar = _dist->npar(); in checkParameterValue() local 71 vector<bool> mask(npar); in checkParameterValue() [all …]
|
H A D | testfun.cc | 68 bool isdiscrete(Function const *f, unsigned int npar, in isdiscrete() argument 71 CPPUNIT_ASSERT(checkNPar(f, npar)); in isdiscrete() 72 BoolIterator mask(npar); in isdiscrete() 87 bool neveradditive(Function const *f, unsigned int npar) in neveradditive() argument 89 CPPUNIT_ASSERT_MESSAGE(f->name(), checkNPar(f, npar)); in neveradditive() 100 bool neverlinear(Function const *f, unsigned int npar) in neverlinear() argument 113 bool neverscale(Function const *f, unsigned int npar) in neverscale() argument 126 bool neverpow(Function const *f, unsigned int npar) in neverpow() argument 139 bool neverclosed(Function const *f, unsigned int npar) in neverclosed() argument 141 return neverscale(f, npar) && neverlinear(f, npar) && in neverclosed() [all …]
|
/dports/science/afni/afni-AFNI_21.3.16/src/ |
H A D | 1dApar2mat.c | 7 int npar ; float parvec[12] ; in main() local 98 for( npar=0 ; npar < 3 ; npar++ ){ in main() 99 parvec[0+npar] = parvec[3+npar] = parvec[9+npar] = 0.0f ; in main() 100 parvec[6+npar] = 1.0f ; /* scale factors */ in main() 106 for( npar=0 ; iarg < argc && npar < 12; iarg++,npar++ ){ in main() 107 parvec[npar] = (float)strtod(argv[iarg],NULL) ; in main() 113 qmat = GA_setup_affine( npar , parvec ) ; in main()
|
H A D | model_expr2.c | 72 static int npar = 0 ; variable 103 npar = (int)AFNI_numenv("AFNI_NLFIM_EXPR2_NPAR") ; in initialize_model() 104 if( npar < 1 || npar > 9 ) npar = 2 ; in initialize_model() 105 mi->params = npar ; in initialize_model() 108 for( ii=0 ; ii < npar ; ii++ ){ in initialize_model() 151 if( npar <= 0 ) in signal_model() 167 if( qvar <= npar ) iab[qvar-1] = ii ; in signal_model() 170 if( qvar != npar ) in signal_model() 171 ERROR_exit("AFNI_NLFIM_EXPR2 expression has %d free variables: should be %d",qvar,npar) ; in signal_model() 183 for( kk=0 ; kk < npar ; kk++ ){ in signal_model()
|
/dports/audio/lmms/lmms-1.2.2/plugins/zynaddsubfx/zynaddsubfx/ExternalPrograms/Controller/ |
H A D | Controller.C | 55 void Controller::sendnrpn(int npar, unsigned char val) { in sendnrpn() argument 58 sendcontroller(0x63, pars[npar].nrpn.cpar); in sendnrpn() 59 sendcontroller(0x62, pars[npar].nrpn.fpar); in sendnrpn() 60 sendcontroller(0x06, pars[npar].nrpn.cval); in sendnrpn() 65 void Controller::send(int npar, float xval) { in send() argument 66 if(pars[npar].mode == 0) in send() 69 if(pars[npar].val1 <= pars[npar].val2) in send() 72 * (pars[npar].val2 - pars[npar].val1 in send() 77 * (pars[npar].val2 - pars[npar].val1 in send() 79 switch(pars[npar].mode) { in send() [all …]
|
/dports/audio/zynaddsubfx/zynaddsubfx-3.0.6-rc5/ExternalPrograms/Controller/ |
H A D | Controller.C | 55 void Controller::sendnrpn(int npar, unsigned char val) { in sendnrpn() argument 58 sendcontroller(0x63, pars[npar].nrpn.cpar); in sendnrpn() 59 sendcontroller(0x62, pars[npar].nrpn.fpar); in sendnrpn() 60 sendcontroller(0x06, pars[npar].nrpn.cval); in sendnrpn() 65 void Controller::send(int npar, float xval) { in send() argument 66 if(pars[npar].mode == 0) in send() 69 if(pars[npar].val1 <= pars[npar].val2) in send() 72 * (pars[npar].val2 - pars[npar].val1 in send() 77 * (pars[npar].val2 - pars[npar].val1 in send() 79 switch(pars[npar].mode) { in send() [all …]
|
/dports/net/norm/norm-1.5r6/src/common/ |
H A D | normEncoderMDP.cpp | 45 : npar(0), vector_size(0), in NormEncoderMDP() 62 npar = numParity; in Init() 105 int degree = 2*npar; in CreateGeneratorPolynomial() 164 memset(&tp1[npar+1], 0, (2*degree)-(npar+1)); in CreateGeneratorPolynomial() 191 if (npar > 1) in Encode() 242 npar = numParity; in Init() 261 for(i=0; i < npar; i++) in Init() 281 for(i=0; i < npar; i++) in Init() 348 for (i = 0; i < npar; i++) in Decode() 378 for(i = 0; i < npar; i++) in Decode() [all …]
|
/dports/cad/meshlab/meshlab-Meshlab-2020.05/src/external/levmar-2.3/ |
H A D | lm.h | 60 #define LM_DER_WORKSZ(npar, nmeas) (2*(nmeas) + 4*(npar) + (nmeas)*(npar) + (npar)*(npar)) argument 61 #define LM_DIF_WORKSZ(npar, nmeas) (4*(nmeas) + 4*(npar) + (nmeas)*(npar) + (npar)*(npar)) argument 66 #define LM_BC_DER_WORKSZ(npar, nmeas) (2*(nmeas) + 4*(npar) + (nmeas)*(npar) + (npar)*(npar)) argument 67 #define LM_BC_DIF_WORKSZ(npar, nmeas) LM_BC_DER_WORKSZ((npar), (nmeas)) /* LEVMAR_BC_DIF currently … argument 72 #define LM_LEC_DER_WORKSZ(npar, nmeas, nconstr) LM_DER_WORKSZ((npar)-(nconstr), (nmeas)) argument 73 #define LM_LEC_DIF_WORKSZ(npar, nmeas, nconstr) LM_DIF_WORKSZ((npar)-(nconstr), (nmeas)) argument 78 #define LM_BLEC_DER_WORKSZ(npar, nmeas, nconstr) LM_LEC_DER_WORKSZ((npar), (nmeas)+(npar), (nconstr… argument 79 #define LM_BLEC_DIF_WORKSZ(npar, nmeas, nconstr) LM_LEC_DIF_WORKSZ((npar), (nmeas)+(npar), (nconstr… argument
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/prepar/ |
H A D | pre_rdsgm.F | 7 + wcorr,npar,ipardef,itopol) 70 if(npar.gt.nparms) call md_abort('Error in number par sets',npar) 71 do 2 i=1,npar 75 do 102 i=npar+1,nparms 76 wcorr(i)=wcorr(npar) 97 + j=1,npar) 107 do 4 j=2,npar+1 119 do 1103 j=1,npar 259 do 8 j=1,npar 262 if(l.eq.npar) then [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/prepar/ |
H A D | pre_rdsgm.F | 7 + wcorr,npar,ipardef,itopol) 70 if(npar.gt.nparms) call md_abort('Error in number par sets',npar) 71 do 2 i=1,npar 75 do 102 i=npar+1,nparms 76 wcorr(i)=wcorr(npar) 97 + j=1,npar) 107 do 4 j=2,npar+1 119 do 1103 j=1,npar 259 do 8 j=1,npar 262 if(l.eq.npar) then [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/ |
H A D | argos_prep_rdsgm.F | 7 + wcorr,npar,ipardef,itopol) 70 if(npar.gt.nparms) call md_abort('Error in number par sets',npar) 71 do 2 i=1,npar 75 do 102 i=npar+1,nparms 76 wcorr(i)=wcorr(npar) 97 + j=1,npar) 107 do 4 j=2,npar+1 119 do 1103 j=1,npar 259 do 8 j=1,npar 262 if(l.eq.npar) then [all …]
|
H A D | argos_prepare_rdsgm.F | 7 + wcorr,npar,ipardef,itopol) 70 if(npar.gt.nparms) call md_abort('Error in number par sets',npar) 71 do 2 i=1,npar 75 do 102 i=npar+1,nparms 76 wcorr(i)=wcorr(npar) 97 + j=1,npar) 107 do 4 j=2,npar+1 119 do 1103 j=1,npar 259 do 8 j=1,npar 262 if(l.eq.npar) then [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/ |
H A D | argos_prepare_rdsgm.F | 7 + wcorr,npar,ipardef,itopol) 70 if(npar.gt.nparms) call md_abort('Error in number par sets',npar) 71 do 2 i=1,npar 75 do 102 i=npar+1,nparms 76 wcorr(i)=wcorr(npar) 97 + j=1,npar) 107 do 4 j=2,npar+1 119 do 1103 j=1,npar 259 do 8 j=1,npar 262 if(l.eq.npar) then [all …]
|
H A D | argos_prep_rdsgm.F | 7 + wcorr,npar,ipardef,itopol) 70 if(npar.gt.nparms) call md_abort('Error in number par sets',npar) 71 do 2 i=1,npar 75 do 102 i=npar+1,nparms 76 wcorr(i)=wcorr(npar) 97 + j=1,npar) 107 do 4 j=2,npar+1 119 do 1103 j=1,npar 259 do 8 j=1,npar 262 if(l.eq.npar) then [all …]
|
/dports/math/R/R-4.1.2/src/library/stats/src/ |
H A D | optim.c | 234 npar = LENGTH(par); in optim() 235 dpar = vect(npar); in optim() 236 opar = vect(npar); in optim() 354 double *lower = vect(npar), *upper = vect(npar); in optim() 418 int npar, i , j; in optimhess() local 454 PROTECT(ans = allocMatrix(REALSXP, npar, npar)); in optimhess() 455 dpar = vect(npar); in optimhess() 458 df1 = vect(npar); in optimhess() 459 df2 = vect(npar); in optimhess() 475 0.5 * (REAL(ans)[i * npar + j] + REAL(ans)[j * npar + i]); in optimhess() [all …]
|
/dports/math/libRmath/R-4.1.1/src/library/stats/src/ |
H A D | optim.c | 234 npar = LENGTH(par); in optim() 235 dpar = vect(npar); in optim() 236 opar = vect(npar); in optim() 354 double *lower = vect(npar), *upper = vect(npar); in optim() 418 int npar, i , j; in optimhess() local 454 PROTECT(ans = allocMatrix(REALSXP, npar, npar)); in optimhess() 455 dpar = vect(npar); in optimhess() 458 df1 = vect(npar); in optimhess() 459 df2 = vect(npar); in optimhess() 475 0.5 * (REAL(ans)[i * npar + j] + REAL(ans)[j * npar + i]); in optimhess() [all …]
|
/dports/biology/gemma/GEMMA-0.98.3/src/ |
H A D | logistic.cpp | 27 int npar = beta->size; in fLogit_mixed() local 88 int npar = beta->size; in wgsl_mixed_optim_df() local 138 int npar = beta->size; in wgsl_mixed_optim_hessian() local 212 int npar = beta->size; in logistic_mixed_fit() local 227 gsl_matrix *myH = gsl_matrix_safe_alloc(npar, npar); // Hessian matrix. in logistic_mixed_fit() 278 int npar = beta->size; in fLogit_cat() local 332 int npar = beta->size; in wgsl_cat_optim_df() local 372 int npar = beta->size; in wgsl_cat_optim_hessian() local 443 int npar = beta->size; in logistic_cat_fit() local 459 gsl_matrix *myH = gsl_matrix_safe_alloc(npar, npar); // Hessian matrix. in logistic_cat_fit() [all …]
|
/dports/math/abs/abs-src-0.908/Examples/ |
H A D | life.abs | 74 npar = 0.0 77 npar = npar + 1 80 npar = npar + 1 83 npar = npar + 1 87 npar = npar + 1 90 npar = npar + 1 94 npar = npar + 1 97 npar = npar + 1 100 npar = npar + 1 104 If npar <2 or npar > 3 Then [all …]
|
/dports/math/py-iminuit/iminuit-2.8.4/extern/root/math/minuit2/inc/Minuit2/ |
H A D | FumiliFCNBase.h | 65 FumiliFCNBase(unsigned int npar) in FumiliFCNBase() argument 66 : fNumberOfParameters(npar), fValue(0), fGradient(std::vector<double>(npar)), in FumiliFCNBase() 67 fHessian(std::vector<double>(static_cast<int>(0.5 * npar * (npar + 1)))) in FumiliFCNBase() 127 virtual void InitAndReset(unsigned int npar) in InitAndReset() argument 129 fNumberOfParameters = npar; in InitAndReset() 130 fGradient = std::vector<double>(npar); in InitAndReset() 131 fHessian = std::vector<double>(static_cast<int>(0.5 * npar * (npar + 1))); in InitAndReset()
|
/dports/graphics/duhdraw/duhdraw-2.8.13/ |
H A D | ansi-esc.c | 37 static int npar; variable 79 for (i = 0; i <= npar; i++) in csi_m() 263 npar = 0; in ansi_esc_translate() 399 for (npar = 0; npar < 7; npar++) in ansi_esc_translate() 400 par[npar] = 0; in ansi_esc_translate() 401 npar = 0; in ansi_esc_translate() 422 for (npar = 0; npar < 7; npar++) in ansi_esc_translate() 423 par[npar] = 0; in ansi_esc_translate() 424 npar = 0; in ansi_esc_translate() 437 npar++; in ansi_esc_translate() [all …]
|
/dports/sysutils/webmin/webmin-1.981/dhcpd/ |
H A D | save_host.cgi | 9 ($par, $host, $indent, $npar, $nindent) = get_branch('hst', $in{'new'}); 26 (!$npar || &can('rw', \%access, $npar)); 31 (!$npar || &can('rw', \%access, $npar)); 58 foreach $h (&get_my_shared_network_hosts($npar)) { 71 foreach $h (&get_my_shared_network_hosts($npar)) { 103 foreach $h (&get_my_shared_network_hosts($npar)) { 127 if (!$npar || $in{'assign'} > 0 && $npar->{'name'} ne $partypes[$in{'assign'}]) { 142 &save_directive($npar, [ ], [ $host ], $nindent); 144 elsif ($par eq $npar) { 155 &save_directive($npar, [ ], [ $host ], $nindent);
|
/dports/math/R-cran-lava/lava/R/ |
H A D | modelPar.R | 16 npar <- index(x)$npar functionVar 18 if (length(p)!=npar & length(p)<(npar+npar.mean)) stop("Wrong dimension of parameter vector!") 20 if (length(p)!=npar) { ## if meanstructure 26 p <- p.[seq_len(npar)] 27 if (npar>0) { 28 p2 <- p.[-seq_len(npar)] 51 if (length(p)==x$npar) { 72 npar <- x$npar functionVar 75 if (length(p)!=npar & length(p)!=(npar+npar.mean)) stop("Wrong dimension of parameter vector!") 76 if (length(p)!=npar) { ## if meanstructure
|
/dports/math/py-iminuit/iminuit-2.8.4/extern/root/math/minuit2/src/ |
H A D | FumiliMinimizer.cxx | 45 unsigned int npar = st.VariableParameters(); in Minimize() local 47 maxfcn = 200 + 100 * npar + 5 * npar * npar; in Minimize() 63 FumiliGradientCalculator fgc(*fumiliFcn, st.Trafo(), npar); in Minimize() 82 unsigned int npar = st.VariableParameters(); in Minimize() local 84 maxfcn = 200 + 100 * npar + 5 * npar * npar; in Minimize() 96 FumiliGradientCalculator fgc(*fumiliFcn, st.Trafo(), npar); in Minimize()
|
/dports/math/PDL/PDL-2.019/Lib/Fit/Gaussian/ |
H A D | gauss.c | 65 for(i=0; i<npar; i++) in seta() 67 for (j=0; j<npar; j++) in seta() 81 for(i=0; i<npar; i++) { in setb() 306 if (npoints < npar) { in marquardt() 337 for (k=0; k<npar; k++) { in marquardt() 355 decomp(npar ,npar, aprime, iorder); in marquardt() 356 lineq(npar, npar, aprime, b, delta, iorder); in marquardt() 361 if (i<npar) in marquardt() 399 seta(npar,npoints,a,d,sig); setb(npar,npoints,b,d,y,yfit,sig); in marquardt() 422 for (i=0; i<npar; i++) in marquardt() [all …]
|