| /dports/math/maxima/maxima-5.43.2/tests/ |
| H A D | rtestparser_continuations_cr.mac | 83 nfunc:length(FuncList),
84 if length(VarList) # nfunc
92 apply(kill,VarList),NewtonMatrix:zeromatrix(nfunc,nfunc),
93 for i thru nfunc do
94 (for j thru nfunc do
108 for i thru nfunc do
121 GuessList):=block([nfunc,Newton\
125 sList:float(GuessList),nfunc:le\
127 t) # nfunc then (print("mnewton\
129 names (",nfunc,"functions but",\
[all …]
|
| H A D | rtestparser_continuations_crnl.mac | 83 nfunc:length(FuncList),
84 if length(VarList) # nfunc
92 apply(kill,VarList),NewtonMatrix:zeromatrix(nfunc,nfunc),
93 for i thru nfunc do
94 (for j thru nfunc do
108 for i thru nfunc do
121 GuessList):=block([nfunc,Newton\
125 sList:float(GuessList),nfunc:le\
127 t) # nfunc then (print("mnewton\
129 names (",nfunc,"functions but",\
[all …]
|
| H A D | rtestparser_continuations_nl.mac | 83 nfunc:length(FuncList),
84 if length(VarList) # nfunc
92 apply(kill,VarList),NewtonMatrix:zeromatrix(nfunc,nfunc),
93 for i thru nfunc do
94 (for j thru nfunc do
108 for i thru nfunc do
121 GuessList):=block([nfunc,Newton\
125 sList:float(GuessList),nfunc:le\
127 t) # nfunc then (print("mnewton\
129 names (",nfunc,"functions but",\
[all …]
|
| /dports/comms/wsjtz/wsjtx/lib/ft2/ |
| H A D | ft2.f90 | 108 nfunc=0
109 if(ic1.eq.0 .and. ic2.eq.59) nfunc=1 !F1
110 if(ic1.eq.0 .and. ic2.eq.60) nfunc=2 !F2
111 if(ic1.eq.0 .and. ic2.eq.61) nfunc=3 !F3
112 if(ic1.eq.0 .and. ic2.eq.62) nfunc=4 !F4
114 if(nfunc.eq.1 .or. (nfunc.ge.2 .and. hiscall.ne.' ')) then
116 call transmit(nfunc,ftx,iptt)
265 if(nfunc.eq.5) txmsg='TNX 73 GL'
274 if(nfunc.ge.1 .and. nfunc.le.4) ntxed=nfunc
275 if(nfunc.ge.1 .and. nfunc.le.5) ltx(nfunc)=.true.
[all …]
|
| /dports/shells/mksh/mksh/ |
| H A D | dot.mkshrc | 475 i_func[nfunc++]=.
476 i_func[nfunc++]=:
477 i_func[nfunc++]='['
482 i_func[nfunc++]=cat
483 i_func[nfunc++]=cd
493 i_func[nfunc++]=fc
497 i_func[nfunc++]=let
520 i_func[nfunc++]=bg
521 i_func[nfunc++]=fg
541 i_func[nfunc++]=hd
[all …]
|
| /dports/math/libmesh/libmesh-1.6.2/contrib/fparser/examples/ |
| H A D | perfjit.cc | 28 void testFParser(const char *func[], int nfunc, bool ad) in testFParser() argument
33 for (unsigned int i = 0; i < nfunc; ++i) in testFParser()
82 std::cout << " (mean compile time " << (tcms/nfunc) << " ms)\n"; in testFParser()
87 const int nfunc = 7; in testRegular() local
88 const char *func[nfunc] = { in testRegular()
98 testFParser(func, nfunc, false); in testRegular()
103 const int nfunc = 4; in testDerivatives() local
104 const char *func[nfunc] = { in testDerivatives()
111 testFParser(func, nfunc, true); in testDerivatives()
|
| /dports/science/qwalk/mainline-1.0.1-300-g1b7e381/utils/ |
| H A D | compare_mo.cpp | 36 void read_mo(string & orbin, int nmo, int nfunc, Array2 <double> & moCoeff) in read_mo() argument
45 moCoeff.Resize(nmo, nfunc); in read_mo()
47 for(int f=0; f< nfunc; f++) { in read_mo()
155 int nfunc=atoi(argv[1]); in main() local
156 Array2 <doublevar> mo1(nmo, nfunc), mo2(nmo, nfunc); in main()
157 Array2 <doublevar> lcao_overlap(nfunc, nfunc); in main()
159 for(int i=0; i< nfunc; i++) in main()
165 read_mo(file1, nmo, nfunc, mo1); in main()
166 read_mo(file2, nmo, nfunc, mo2); in main()
|
| /dports/science/qwalk/mainline-1.0.1-300-g1b7e381/src/converter/ |
| H A D | basis_writer.h | 32 virtual int nfunc()=0;
45 int nfunc();
59 int nfunc();
67 int nfunc();
74 int nfunc();
81 int nfunc();
89 int nfunc();
|
| H A D | basis_writer.cpp | 49 int Gaussian_basis_set::nfunc() { //number of functions that this set has. in nfunc() function in Gaussian_basis_set
106 int Spline_basis_writer::nfunc() { in nfunc() function in Spline_basis_writer
116 int Pade_molecular_basis::nfunc(){ in nfunc() function in Pade_molecular_basis
152 int Exponential_cusp_basis::nfunc() { in nfunc() function in Exponential_cusp_basis
165 int Cutoff_cusp_basis::nfunc() { in nfunc() function in Cutoff_cusp_basis
181 int Poly_pade_basis::nfunc() { in nfunc() function in Poly_pade_basis
|
| H A D | wf_writer.cpp | 259 int nfunc=0; in print_wavefunction() local
263 nfunc+=ei_basis[g][bas]->nfunc(); in print_wavefunction()
267 if(nfunc > 0) { in print_wavefunction()
269 for(int i=0; i< nfunc; i++) in print_wavefunction()
294 int nfunc=0; in print_wavefunction() local
297 nfunc+=(*i)->nfunc(); in print_wavefunction()
299 if(nfunc > 0) { in print_wavefunction()
302 for(int j=0; j< nfunc; j++) in print_wavefunction()
|
| /dports/science/qwalk/mainline-1.0.1-300-g1b7e381/src/wavefunction/ |
| H A D | Wf_return.h | 45 Wf_return(int nfunc, int nst) { in Wf_return()
47 Resize(nfunc,nst); in Wf_return()
50 void Resize(int nfunc, int nst) { in Resize()
51 amp.Resize(nfunc, nst); in Resize()
52 phase.Resize(nfunc, nst); in Resize()
53 cvals.Resize(nfunc, nst); in Resize()
|
| H A D | Wf_return.cpp | 26 int nfunc, nst; in read() local
28 is >> dummy >> nfunc; in read()
31 Resize(nfunc, nst); in read()
34 is >> dummy; read_array(is, nfunc, nst, amp); in read()
35 is >> dummy; read_array(is, nfunc, nst, phase); in read()
116 int nfunc=v.GetDim(0); in setVals() local
118 Resize(nfunc,nst); in setVals()
119 for(int f=0; f< nfunc; f++) { in setVals()
131 int nfunc=v.GetDim(0); in setVals() local
133 Resize(nfunc,nst); in setVals()
[all …]
|
| /dports/graphics/opencv/opencv-4.5.3/modules/core/test/ |
| H A D | test_hal_core.cpp | 58 int nfunc = hcase / 2; in TEST() local
69 switch (nfunc) in TEST()
96 switch (nfunc) in TEST()
117 … (nfunc == HAL_EXP ? "exp" : nfunc == HAL_LOG ? "log" : nfunc == HAL_SQRT ? "sqrt" : "???"), in TEST()
138 int nfunc = (hcase / 8); in TEST_P() local
159 switch (nfunc) in TEST_P()
180 bool solveStatus = solve(a0, b, x0, (nfunc == HAL_LU ? DECOMP_LU : DECOMP_CHOLESKY)); in TEST_P()
196 (nfunc == HAL_LU ? "LU" : nfunc == HAL_CHOL ? "Cholesky" : "???"), in TEST_P()
|
| /dports/math/py-gau2grid/gau2grid-2.0.7/gau2grid/ |
| H A D | utility.py | 132 nfunc = [nspherical(func[0]) for func in parsed_basis]
133 ntotal = sum(nfunc)
135 nfunc = [ncartesian(func[0]) for func in parsed_basis]
136 ntotal = sum(nfunc)
138 return parsed_basis, nfunc, ntotal
153 parsed_basis, nfunc, ntotal = _parse_basis(basis, spherical)
163 nvals = nfunc[n]
190 parsed_basis, nfunc, ntotal = _parse_basis(basis, spherical)
203 nvals = nfunc[n]
|
| /dports/math/gau2grid/gau2grid-2.0.7/gau2grid/ |
| H A D | utility.py | 132 nfunc = [nspherical(func[0]) for func in parsed_basis]
133 ntotal = sum(nfunc)
135 nfunc = [ncartesian(func[0]) for func in parsed_basis]
136 ntotal = sum(nfunc)
138 return parsed_basis, nfunc, ntotal
153 parsed_basis, nfunc, ntotal = _parse_basis(basis, spherical)
163 nvals = nfunc[n]
190 parsed_basis, nfunc, ntotal = _parse_basis(basis, spherical)
203 nvals = nfunc[n]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/lr_tddft_grad/ |
| H A D | tddft_grad_init_func.F | 51 integer nfunc
52 parameter (nfunc = 40)
53 character*16 xfnc_alias(nfunc), cfnc_alias(nfunc)
81 if (numfunc.ne.nfunc)
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/nwdft/lr_tddft_grad/ |
| H A D | tddft_grad_init_func.F | 51 integer nfunc
52 parameter (nfunc = 40)
53 character*16 xfnc_alias(nfunc), cfnc_alias(nfunc)
81 if (numfunc.ne.nfunc)
|
| /dports/math/maxima/maxima-5.43.2/share/mnewton/ |
| H A D | mnewton.mac | 59 block([nfunc, Solutions, Increments, solved:false, h, DF, numer:numer,
77 nfunc:length(FuncList),
78 if length(VarList) # nfunc then (
79 print("mnewton: incorrect number of variable names (", nfunc,
83 if length(GuessList) # nfunc then (
84 print("mnewton: incorrect number of approach values (", nfunc,
90 DF: zeromatrix (nfunc, nfunc),
91 h : makelist (h[i], i, 1, nfunc),
92 for i:1 thru nfunc do
93 for j:1 thru nfunc do
[all …]
|
| /dports/science/gromacs/gromacs-2021.4/src/gromacs/correlationfunctions/ |
| H A D | manyautocorrelation.cpp | 54 size_t nfunc = (*c).size(); in many_auto_correl() local
55 if (nfunc == 0) in many_auto_correl()
65 for (size_t i = 1; i < nfunc; i++) in many_auto_correl()
92 int i0 = (thread_id * nfunc) / nthreads; in many_auto_correl()
93 int i1 = std::min(nfunc, ((thread_id + 1) * nfunc) / nthreads); in many_auto_correl()
|
| /dports/sysutils/syslinux/syslinux-6.03/com32/sysdump/ |
| H A D | pci.c | 36 unsigned int nbus, ndev, nfunc, maxfunc; in dump_pci() local
51 for (nfunc = 0; nfunc < maxfunc; nfunc++) { in dump_pci()
52 a = pci_mkaddr(nbus, ndev, nfunc, 0); in dump_pci()
|
| /dports/science/multiwfn/gMultiwfn-3.4.1-0-14-ge873677/src/ |
| H A D | LSB.f90 | 121 funcref(ipt,2:nfunc)=funcref(ipt,2:nfunc)+arrtmp(2:nfunc)
154 funcval(ipt,2:nfunc)=arrtmp(2:nfunc)
155 funcgrdn(ipt,2:nfunc)=arrtmp2(2:nfunc)
248 do ifunc=0,nfunc
715 funcref(ipt,2:nfunc)=funcref(ipt,2:nfunc)+arrtmp(2:nfunc)
738 funcval(ipt,2:nfunc)=arrtmp(2:nfunc)
739 funcgrdn(ipt,2:nfunc)=arrtmp2(2:nfunc)
988 funcref(ipt,2:nfunc)=funcref(ipt,2:nfunc)+arrtmp(2:nfunc)
1014 funcval(ipt,2:nfunc)=arrtmp(2:nfunc)
1015 funcgrdn(ipt,2:nfunc)=arrtmp2(2:nfunc)
[all …]
|
| /dports/science/libxc/libxc-5.0.0/src/ |
| H A D | genwiki.c | 31 void sort_funcs(int * list, int nfunc) { in sort_funcs() argument
32 qsort(list,nfunc,sizeof(int),compare); in sort_funcs()
168 int nfunc; in main() local
183 nfunc=0; in main()
199 funclist[nfunc++]=func_id; in main()
206 sort_funcs(funclist,nfunc); in main()
209 if(nfunc) { in main()
211 for(ii=0;ii<nfunc;ii++) { in main()
|
| /dports/science/libgridxc/libgridxc-libgridxc-0.9.6/Testers/ |
| H A D | test5.f90 | 23 integer, parameter:: nfunc = 1 ! Number of functionals variable
41 n1n2phi_exact, n1n2phi_interp, pi, r12, wc(nfunc), wx(nfunc)
47 wx = 1._dp/nfunc
48 wc = 1._dp/nfunc
49 call setXC( nfunc, func, auth, wx, wc )
|
| /dports/science/siesta/siesta-4.1.5/Src/SiestaXC/Testers/ |
| H A D | test5.f90 | 23 integer, parameter:: nfunc = 1 ! Number of functionals variable
41 n1n2phi_exact, n1n2phi_interp, pi, r12, wc(nfunc), wx(nfunc)
47 wx = 1._dp/nfunc
48 wc = 1._dp/nfunc
49 call setXC( nfunc, func, auth, wx, wc )
|
| /dports/devel/splint/splint-3.1.2/test/tests2.4/ |
| H A D | nothing.c | 3 static void nfunc(void); in main()
4 nfunc(); in main()
7 static void nfunc(){} in nfunc() function
|