Home
last modified time | relevance | path

Searched refs:infowk (Results 1 – 22 of 22) sorted by relevance

/dports/math/R-cran-gss/gss/src/
H A Dreg.f8 integer i, j, nn, idamax, infowk, idum
26 infowk = 0
29 infowk = infowk + jpvt(i)
34 j = idamax (rkv-infowk, v(infowk+1,infowk+1), nn+1)
35 23011 if(v(rkv,rkv).lt.v(infowk+j,infowk+j)*dsqrt(mchpr))then
49 call dtrsl (v, nn, nn, dc, 11, infowk)
51 call dtrsl (v, nn, nn, dc, 01, infowk)
68 call dtrsl (v, nn, nn, mu, 11, infowk)
82 *ull+i), dum, dum, dum, 01000, infowk)
137 call dtrsl (v, nn, nn, mu, 11, infowk)
[all …]
H A Dhzdaux.f81 integer i, infowk local
85 call dtrsl (v, nxis, nxis, r(1,i), 11, infowk)
98 integer i, j, k, kk, idamax, iter, flag, infowk
163 call dmcdc (v, nxis, nxis, wk, jpvt, infowk)
167 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
168 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Dhzdnewton.f35 integer i, j, k, kk, iter, flag, rkv, idamax, infowk
150 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
152 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
277 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
282 call dtrsl (v, nxis, nxis, mrs, 11, infowk)
H A Dcdennewton.f39 integer i, j, k, kk, iter, flag, rkv, idamax, infowk
173 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
175 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
311 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
353 integer i, j, k, kk, iter, flag, idamax, infowk
426 call dmcdc (v, nxis, nxis, cdnew, jpvt, infowk)
430 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
431 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Dcdennewton10.f25 integer i, j, k, iter, flag, rkv, idamax, infowk
100 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
102 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
250 call dtrsl (v, nxis, nxis, wk, 11, infowk)
H A Ddnewton10.f25 integer i, j, k, iter, flag, rkv, idamax, infowk
105 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
107 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
262 call dtrsl (v, nxis, nxis, wk, 11, infowk)
H A Dllrmnewton.f37 integer i, j, k, kk, iter, flag, rkv, idamax, infowk
180 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
182 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
332 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
458 integer i, j, k, kk, iter, flag, idamax, infowk
532 call dmcdc (v, nxis, nxis, cdnew, jpvt, infowk)
536 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
537 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Ddrkl.f31 integer i, j, k, m, iter, flag, idamax, infowk
127 call dmcdc (v, nxis, nxis, muwk, jpvt, infowk)
131 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
132 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Dhzdnewton10.f27 integer i, j, k, iter, flag, rkv, idamax, infowk
95 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
97 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
204 call dtrsl (v, nxis, nxis, wk, 11, infowk)
H A Ddnewton.f38 integer i, j, k, m, iter, flag, rkv, idamax, infowk
183 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
185 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
353 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
H A Dcopu2newton.f47 integer nobs, i, j, k, kk, iter, flag, rkv, idamax, infowk
383 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
385 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
638 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
665 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
692 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
730 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
/dports/math/R-cran-gss/gss/src/ratfor/
H A Dreg.r14 integer i, j, nn, idamax, infowk, idum
28 infowk = 0 globalVar
29 for (i=1;i<=nn;i=i+1) infowk = infowk + jpvt(i) globalVar
31 j = idamax (rkv-infowk, v(infowk+1,infowk+1), nn+1)
32 while (v(rkv,rkv)<v(infowk+j,infowk+j)*dsqrt(mchpr)) rkv = rkv - 1
40 call dtrsl (v, nn, nn, dc, 11, infowk)
42 call dtrsl (v, nn, nn, dc, 01, infowk)
54 call dtrsl (v, nn, nn, mu, 11, infowk)
102 call dtrsl (v, nn, nn, mu, 11, infowk)
130 integer i, j, infowk
[all …]
H A Dhzdaux.r58 integer i, infowk
62 call dtrsl (v, nxis, nxis, r(1,i), 11, infowk)
81 integer i, j, k, kk, idamax, iter, flag, infowk
121 call dmcdc (v, nxis, nxis, wk, jpvt, infowk)
126 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
127 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Dhzdnewton.r49 integer i, j, k, kk, iter, flag, rkv, idamax, infowk
115 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
117 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
206 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
209 call dtrsl (v, nxis, nxis, mrs, 11, infowk)
H A Dcdennewton.r55 integer i, j, k, kk, iter, flag, rkv, idamax, infowk
132 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
134 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
226 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
262 integer i, j, k, kk, iter, flag, idamax, infowk
305 call dmcdc (v, nxis, nxis, cdnew, jpvt, infowk)
310 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
311 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Ddnewton10.r41 integer i, j, k, iter, flag, rkv, idamax, infowk
91 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
93 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
193 call dtrsl (v, nxis, nxis, wk, 11, infowk)
H A Ddrkl.r46 integer i, j, k, m, iter, flag, idamax, infowk
100 call dmcdc (v, nxis, nxis, muwk, jpvt, infowk)
105 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
106 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Dcdennewton10.r41 integer i, j, k, iter, flag, rkv, idamax, infowk
87 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
89 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
185 call dtrsl (v, nxis, nxis, wk, 11, infowk)
H A Dllrmnewton.r54 integer i, j, k, kk, iter, flag, rkv, idamax, infowk
135 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
137 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
233 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
322 integer i, j, k, kk, iter, flag, idamax, infowk
365 call dmcdc (v, nxis, nxis, cdnew, jpvt, infowk)
370 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
371 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
H A Dhzdnewton10.r41 integer i, j, k, iter, flag, rkv, idamax, infowk
85 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
87 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
166 call dtrsl (v, nxis, nxis, wk, 11, infowk)
H A Ddnewton.r56 integer i, j, k, m, iter, flag, rkv, idamax, infowk
134 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
136 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
242 call dtrsl (v, nxis, nxis, rs(1,i), 11, infowk)
H A Dcopu2newton.r61 integer nobs, i, j, k, kk, iter, flag, rkv, idamax, infowk
237 call dtrsl (v, nxis, nxis, cdnew, 11, infowk)
239 call dtrsl (v, nxis, nxis, cdnew, 01, infowk)
386 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
399 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
412 call dtrsl (v, nxis, nxis, muwk, 11, infowk)
429 call dtrsl (v, nxis, nxis, muwk, 11, infowk)