Home
last modified time | relevance | path

Searched refs:NQ (Results 1 – 25 of 2396) sorted by relevance

12345678910>>...96

/dports/math/octave/octave-6.4.0/liboctave/external/odepack/
H A Dcfode.f47 DO 140 NQ = 2,12
55 NQM1 = NQ - 1
57 NQP1 = NQ + 1
59 PC(NQ) = 0.0D0
68 DO 120 I = 2,NQ
75 DO 130 I = 2,NQ
87 DO 230 NQ = 1,5
93 FNQ = DBLE(NQ)
94 NQP1 = NQ + 1
106 TESCO(2,NQ) = DBLE(NQP1)/ELCO(1,NQ)
[all …]
H A Dscfode.f62 DO 140 NQ = 2,12
70 NQM1 = NQ - 1
72 NQP1 = NQ + 1
74 PC(NQ) = 0.0E0
83 DO 120 I = 2,NQ
90 DO 130 I = 2,NQ
102 DO 230 NQ = 1,5
108 FNQ = NQ
109 NQP1 = NQ + 1
121 TESCO(2,NQ) = NQP1/ELCO(1,NQ)
[all …]
/dports/math/slatec/src/
H A Ddcfod.f67 DO 50 NQ = 2, 12
75 NQM1 = NQ - 1
77 NQP1 = NQ + 1
80 PC(NQ) = 0.0D0
91 DO 30 I = 2, NQ
100 DO 40 I = 2, NQ
114 DO 90 NQ = 1, 5
120 FNQ = NQ
121 NQP1 = NQ + 1
137 TESCO(2,NQ) = NQP1/ELCO(1,NQ)
[all …]
H A Dcfod.f67 DO 140 NQ = 2,12
75 NQM1 = NQ - 1
77 NQP1 = NQ + 1
79 PC(NQ) = 0.0E0
88 DO 120 I = 2,NQ
95 DO 130 I = 2,NQ
107 DO 230 NQ = 1,5
113 FNQ = NQ
114 NQP1 = NQ + 1
126 TESCO(2,NQ) = NQP1/ELCO(1,NQ)
[all …]
H A Dddstp.f255 NQ = NQ - 1
256 RC = RC*EL(1,NQ)/EL(1,NQ+1)
293 NQUSED = NQ
309 8 (ETEST/(EPS*EL(NQ+1,1)))**(1.D0/(NQ+1)))
325 8 (ETEST*EL(NQ+1,1)/EPS)**(1.D0/(NQ+1)))
348 NQ = MIN(NQ, MAXORD)
413 NQ = NQ - 1
414 RC = RC*EL(1,NQ)/EL(1,NQ+1)
422 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1)
423 NQ = NQ + 1
[all …]
H A Dcdstp.f256 NQ = NQ - 1
257 RC = RC*EL(1,NQ)/EL(1,NQ+1)
294 NQUSED = NQ
310 8 (ETEST/(EPS*EL(NQ+1,1)))**(1.E0/(NQ+1)))
326 8 (ETEST*EL(NQ+1,1)/EPS)**(1.E0/(NQ+1)))
349 NQ = MIN(NQ, MAXORD)
414 NQ = NQ - 1
415 RC = RC*EL(1,NQ)/EL(1,NQ+1)
423 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1)
424 NQ = NQ + 1
[all …]
H A Dsdstp.f254 NQ = NQ - 1
255 RC = RC*EL(1,NQ)/EL(1,NQ+1)
292 NQUSED = NQ
308 8 (ETEST/(EPS*EL(NQ+1,1)))**(1.E0/(NQ+1)))
324 8 (ETEST*EL(NQ+1,1)/EPS)**(1.E0/(NQ+1)))
347 NQ = MIN(NQ, MAXORD)
412 NQ = NQ - 1
413 RC = RC*EL(1,NQ)/EL(1,NQ+1)
421 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1)
422 NQ = NQ + 1
[all …]
H A Ddstod.f130 NQ = 1
175 NQ = MAXORD
178 EL(I) = ELCO(I,NQ)
180 NQNYH = NQ*NYH
183 CONIT = 0.5D0/(NQ+2)
205 EL(I) = ELCO(I,NQ)
207 NQNYH = NQ*NYH
210 CONIT = 0.5D0/(NQ+2)
586 NEWQ = NQ
628 NQ = NEWQ
[all …]
/dports/math/cmlib/cmlib-3.0_8/src/depac/
H A Dcfod.f55 DO 140 NQ = 2,12
63 NQM1 = NQ - 1
65 NQP1 = NQ + 1
67 PC(NQ) = 0.0E0
76 DO 120 I = 2,NQ
83 DO 130 I = 2,NQ
95 DO 230 NQ = 1,5
101 FNQ = FLOAT(NQ)
102 NQP1 = NQ + 1
114 TESCO(2,NQ) = FLOAT(NQP1)/ELCO(1,NQ)
[all …]
/dports/math/cmlib/cmlib-3.0_8/src/sdriv/
H A Dsdstp.f212 NQ = NQ - 1
213 RC = RC*EL(1,NQ)/EL(1,NQ+1)
248 NQUSED = NQ
265 8 (ETEST/(EPS*EL(NQ+1,1)))**(1.E0/REAL(NQ+1)))
281 8 (ETEST*EL(NQ+1,1)/EPS)**(1.E0/REAL(NQ+1)))
304 NQ = MIN(NQ, MAXORD)
357 NQ = NQ - 1
358 RC = RC*EL(1,NQ)/EL(1,NQ+1)
366 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/REAL(NQ+1)
367 NQ = NQ + 1
[all …]
H A Dsdntp.f1 SUBROUTINE SDNTP (H,K,N,NQ,T,TOUT,YH,Y) argument
16 KUSED = MIN(K, NQ)
19 10 Y(I) = YH(I,NQ+1)
21 DO 20 JJ = 1,NQ
22 J = NQ + 1 - JJ
28 40 FACTOR = FACTOR*REAL(NQ+1-KK)
30 50 Y(I) = FACTOR*YH(I,NQ+1)
31 IF (KUSED .NE. NQ) THEN
33 DO 80 JJ = KUSED+1,NQ
34 J = K + 1 + NQ - JJ
/dports/math/cmlib/cmlib-3.0_8/src/cdriv/
H A Dcdstp.f216 NQ = NQ - 1
217 RC = RC*EL(1,NQ)/EL(1,NQ+1)
252 NQUSED = NQ
269 8 (ETEST/(EPS*EL(NQ+1,1)))**(1.E0/REAL(NQ+1)))
285 8 (ETEST*EL(NQ+1,1)/EPS)**(1.E0/REAL(NQ+1)))
308 NQ = MIN(NQ, MAXORD)
361 NQ = NQ - 1
362 RC = RC*EL(1,NQ)/EL(1,NQ+1)
370 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/REAL(NQ+1)
371 NQ = NQ + 1
[all …]
/dports/math/cmlib/cmlib-3.0_8/src/ddriv/
H A Dddstp.f212 NQ = NQ - 1
213 RC = RC*EL(1,NQ)/EL(1,NQ+1)
248 NQUSED = NQ
265 8 (ETEST/(EPS*EL(NQ+1,1)))**(1.D0/DBLE(NQ+1)))
281 8 (ETEST*EL(NQ+1,1)/EPS)**(1.D0/DBLE(NQ+1)))
304 NQ = MIN(NQ, MAXORD)
357 NQ = NQ - 1
358 RC = RC*EL(1,NQ)/EL(1,NQ+1)
366 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/DBLE(NQ+1)
367 NQ = NQ + 1
[all …]
H A Dddntp.f1 SUBROUTINE DDNTP (H,K,N,NQ,T,TOUT,YH,Y) argument
16 KUSED = MIN(K, NQ)
19 10 Y(I) = YH(I,NQ+1)
21 DO 20 JJ = 1,NQ
22 J = NQ + 1 - JJ
28 40 FACTOR = FACTOR*DBLE(NQ+1-KK)
30 50 Y(I) = FACTOR*YH(I,NQ+1)
31 IF (KUSED .NE. NQ) THEN
33 DO 80 JJ = KUSED+1,NQ
34 J = K + 1 + NQ - JJ
/dports/www/neon/neon-0.32.1/src/
H A Dne_string.c698 #define NQ 1 macro
703 /* 2x */ QT, NQ, QT, NQ, NQ, QT, NQ, QT, QT, QT, QT, NQ, QT, NQ, NQ, QT,
705 /* 4x */ QT, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ,
706 /* 5x */ NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, QT, QT, QT, NQ, NQ,
707 /* 6x */ NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ,
708 /* 7x */ NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, NQ, QT, NQ, QT, NQ, QT,
719 #undef NQ
/dports/math/scalapack/scalapack-2.1.0/SRC/
H A Dpclarfc.f244 $ NQ, RDEST local
299 $ NQ = NQ - ICOFF
609 IPW = NQ+1
617 IPW = NQ+1
652 IPW = NQ+1
680 IF( NQ.GT.0 ) THEN
714 IPW = NQ+1
723 IPW = NQ+1
734 IF( NQ.GT.0 ) THEN
756 IPW = NQ+1
[all …]
H A Dpdlarf.f243 $ NQ, RDEST local
298 $ NQ = NQ - ICOFF
611 IPW = NQ+1
619 IPW = NQ+1
654 IPW = NQ+1
681 IF( NQ.GT.0 ) THEN
715 IPW = NQ+1
725 IPW = NQ+1
736 IF( NQ.GT.0 ) THEN
759 IPW = NQ+1
[all …]
H A Dpslarf.f243 $ NQ, RDEST
298 $ NQ = NQ - ICOFF
611 IPW = NQ+1
619 IPW = NQ+1
654 IPW = NQ+1
681 IF( NQ.GT.0 ) THEN
715 IPW = NQ+1
725 IPW = NQ+1
736 IF( NQ.GT.0 ) THEN
759 IPW = NQ+1
[all …]
H A Dpclarf.f244 $ NQ, RDEST local
299 $ NQ = NQ - ICOFF
613 IPW = NQ+1
621 IPW = NQ+1
656 IPW = NQ+1
683 IF( NQ.GT.0 ) THEN
717 IPW = NQ+1
727 IPW = NQ+1
738 IF( NQ.GT.0 ) THEN
761 IPW = NQ+1
[all …]
H A Dpzlarf.f244 $ NQ, RDEST local
299 $ NQ = NQ - ICOFF
613 IPW = NQ+1
621 IPW = NQ+1
656 IPW = NQ+1
683 IF( NQ.GT.0 ) THEN
717 IPW = NQ+1
727 IPW = NQ+1
738 IF( NQ.GT.0 ) THEN
761 IPW = NQ+1
[all …]
H A Dpzlarfc.f244 $ NQ, RDEST local
299 $ NQ = NQ - ICOFF
609 IPW = NQ+1
617 IPW = NQ+1
652 IPW = NQ+1
680 IF( NQ.GT.0 ) THEN
714 IPW = NQ+1
723 IPW = NQ+1
734 IF( NQ.GT.0 ) THEN
756 IPW = NQ+1
[all …]
/dports/science/simbody/simbody-Simbody-3.7/SimTKmath/Geometry/src/
H A DGeodesicEquations.h149 NQ = D+NJ, // Number of 2nd order equations. enumerator
150 N = 2*NQ, // Number of differential equations.
184 static const Vec<NQ>& getQ(const Vec<N>& y) {return Vec<NQ>::getAs(&y[0]);} in getQ()
185 static Vec<NQ>& updQ(Vec<N>& y) {return Vec<NQ>::updAs(&y[0]);} in updQ()
187 static const Vec<NQ>& getU(const Vec<N>& y) {return Vec<NQ>::getAs(&y[NQ]);} in getU()
188 static Vec<NQ>& updU(Vec<N>& y) {return Vec<NQ>::updAs(&y[NQ]);} in updU()
196 static Vec3& updV(Vec<N>& y) {return Vec3::updAs(&y[NQ]);} in updV()
202 static Real& updJRotDot(Vec<N>& y) {return y[NQ+D];} in updJRotDot()
207 static Real& updJTransDot(Vec<N>& y) {return y[NQ+D+1];} in updJTransDot()
228 NQ = D+NJ, // Number of 2nd order equations. enumerator
[all …]
/dports/science/dcl/dcl-5.4.8/src/grph2/uepack/
H A Duearea.f77 NQ=0
82 NQ=4
87 NQ=NQ+1
88 AX(NQ)=XP(N)
89 AY(NQ)=YP(N)
109 NQ=NQ+1
130 NP(1)=NQ-NPT
134 AX(NQ+1)=AX(1)
135 AX(NQ+2)=AX(2)
150 NP(2)=NQ-NPT
[all …]
/dports/sysutils/nq/nq-0.4/
H A Dtests3 : ${NQ:=../nq}
28 check 'fails with no arguments' ! $NQ
43 check 'enqueing true' f1=$($NQ true)
44 check 'enqueing sleep 500' f2=$($NQ sleep 500)
45 check 'first job is done already' $NQ -t $f1
61 check 'enqueing env' f1=$($NQ env)
62 $NQ -w
78 check 'second job is running' ! $NQ -t $f2
79 $NQ -w $f2
80 check 'fourth job is running' ! $NQ -t $f4
[all …]
/dports/science/py-scipy/scipy-1.7.1/scipy/odr/odrpack/
H A Dd_odr.f890 + WRK1(N,M,NQ),WRK2(N,NQ),WRK6(N,NP,NQ),WRK7(-2:2,NQ),XPLUSD(N,M)
1049 + WE1(LDWE,LD2WE,NQ),WRK1(N,M,NQ),WRK2(N,NQ),WRK3(NP),
1368 + WRK0(NQ,NQ),WRK4(M,M)
2262 + WRK1(N,M,NQ),WRK2(N,NQ),WRK3(NP),WRK6(N,NP,NQ),
2568 + WRK1(N,M,NQ),WRK2(N,NQ),WRK3(NP),WRK6(N,NP,NQ),
2843 + BETA(NP),DIFF(NQ,NP+M),FJACB(N,NP,NQ),FJACD(N,M,NQ),
2845 + WRK1(N,M,NQ),WRK2(N,NQ),WRK6(N,NP,NQ),XPLUSD(N,M)
4715 LWRK = N*M*NQ + N*NQ
5038 + DELTA(N,M),F(N,NQ),FJACB(N,NP,NQ),FJACD(N,M,NQ),
5303 + F(N,NQ),FJACB(N,NP,NQ),FJACD(N,M,NQ),FN(N,NQ),FS(N,NQ),
[all …]

12345678910>>...96