Home
last modified time | relevance | path

Searched refs:KINT (Results 1 – 25 of 76) sorted by relevance

1234

/dports/misc/libemos/libemos-4.5.9-Source/tools/bufr_exports/synop2bufr/
H A Dsynop2bufr.f1491 IF ( KINT(3).EQ.2.OR.KINT(3).LT.0.OR.KINT(3).GT.4)
1715 CALL IC3333(KINT(7),KINT(6),KINT(8),MINDIC,KDEC(5),KDEC(6))
1783 CALL IC0877(KINT(19),KINT(256),KINT(3),K,MINDIC,KDEC(25),
1786 CALL IC0877(KINT(19),KINT(20),KINT(3),K,MINDIC,KDEC(25),
1843 IF(KINT(25) .EQ. 9) KDEC(33)=KINT(26)
1875 KDEC(35)=KINT(31) + 1000*KINT(30)
2914 IF (KINT(3).EQ.2.OR.KINT(3).LT.0.OR.KINT(3).GT.4)
7307 IBL=(KINT( 9)-48)*10+KINT(10)-48
7308 IST=(KINT(11)-48)*100+(KINT(12)-48)*10+KINT(13)-48
7348 1 (KINT(11)-48)*100+(KINT(12)-48)*10+KINT(13)-48
[all …]
/dports/math/scalapack/scalapack-2.1.0/PBLAS/SRC/PBBLAS/
H A Dpbdtrget.f31 INTEGER KINT, KINT2, KLEN, KMOD, KPPOS, NLEN, NNUM,
51 KINT = IGD
62 KINT2 = 2 * KINT
66 IF( KPPOS+KINT.LT.NNUM ) THEN
70 $ MOD(MYROW+KINT, NPROW), MYCOL )
79 KINT = KINT2
91 KINT = IGD
102 KINT2 = 2 * KINT
106 IF( KPPOS+KINT.LT.NNUM ) THEN
115 $ MOD(NPCOL+MYCOL-KINT, NPCOL) )
[all …]
H A Dpbstrget.f31 INTEGER KINT, KINT2, KLEN, KMOD, KPPOS, NLEN, NNUM,
51 KINT = IGD
62 KINT2 = 2 * KINT
66 IF( KPPOS+KINT.LT.NNUM ) THEN
70 $ MOD(MYROW+KINT, NPROW), MYCOL )
79 KINT = KINT2
91 KINT = IGD
102 KINT2 = 2 * KINT
106 IF( KPPOS+KINT.LT.NNUM ) THEN
115 $ MOD(NPCOL+MYCOL-KINT, NPCOL) )
[all …]
H A Dpbztrget.f31 INTEGER KINT, KINT2, KLEN, KMOD, KPPOS, NLEN, NNUM, local
51 KINT = IGD
62 KINT2 = 2 * KINT
66 IF( KPPOS+KINT.LT.NNUM ) THEN
70 $ MOD(MYROW+KINT, NPROW), MYCOL )
79 KINT = KINT2
91 KINT = IGD
102 KINT2 = 2 * KINT
106 IF( KPPOS+KINT.LT.NNUM ) THEN
115 $ MOD(NPCOL+MYCOL-KINT, NPCOL) )
[all …]
H A Dpbctrget.f31 INTEGER KINT, KINT2, KLEN, KMOD, KPPOS, NLEN, NNUM, local
51 KINT = IGD
62 KINT2 = 2 * KINT
66 IF( KPPOS+KINT.LT.NNUM ) THEN
70 $ MOD(MYROW+KINT, NPROW), MYCOL )
79 KINT = KINT2
91 KINT = IGD
102 KINT2 = 2 * KINT
106 IF( KPPOS+KINT.LT.NNUM ) THEN
115 $ MOD(NPCOL+MYCOL-KINT, NPCOL) )
[all …]
/dports/lang/luajit/LuaJIT-2.0.5/src/
H A Dlj_opt_fold.c255 LJFOLD(ADD KINT KINT)
256 LJFOLD(SUB KINT KINT) in LJFOLD() argument
257 LJFOLD(MUL KINT KINT) in LJFOLD()
258 LJFOLD(MOD KINT KINT) in LJFOLD()
259 LJFOLD(NEG KINT KINT) in LJFOLD()
261 LJFOLD(BOR KINT KINT) in LJFOLD()
268 LJFOLD(MIN KINT KINT) in LJFOLD()
300 LJFOLD(LT KINT KINT)
301 LJFOLD(GE KINT KINT) in LJFOLD() argument
302 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/devel/tex-libtexluajit/texlive-20150521-source/libs/luajit/LuaJIT-2.0.3/src/
H A Dlj_opt_fold.c255 LJFOLD(ADD KINT KINT)
256 LJFOLD(SUB KINT KINT) in LJFOLD() argument
257 LJFOLD(MUL KINT KINT) in LJFOLD()
258 LJFOLD(MOD KINT KINT) in LJFOLD()
259 LJFOLD(NEG KINT KINT) in LJFOLD()
261 LJFOLD(BOR KINT KINT) in LJFOLD()
268 LJFOLD(MIN KINT KINT) in LJFOLD()
300 LJFOLD(LT KINT KINT)
301 LJFOLD(GE KINT KINT) in LJFOLD() argument
302 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/multimedia/aegisub/aegisub-3.2.2/vendor/luajit/src/
H A Dlj_opt_fold.c255 LJFOLD(ADD KINT KINT)
256 LJFOLD(SUB KINT KINT) in LJFOLD() argument
257 LJFOLD(MUL KINT KINT) in LJFOLD()
258 LJFOLD(MOD KINT KINT) in LJFOLD()
259 LJFOLD(NEG KINT KINT) in LJFOLD()
261 LJFOLD(BOR KINT KINT) in LJFOLD()
268 LJFOLD(MIN KINT KINT) in LJFOLD()
300 LJFOLD(LT KINT KINT)
301 LJFOLD(GE KINT KINT) in LJFOLD() argument
302 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/print/tex-luatex/texlive-20150521-source/libs/luajit/LuaJIT-2.0.3/src/
H A Dlj_opt_fold.c255 LJFOLD(ADD KINT KINT)
256 LJFOLD(SUB KINT KINT) in LJFOLD() argument
257 LJFOLD(MUL KINT KINT) in LJFOLD()
258 LJFOLD(MOD KINT KINT) in LJFOLD()
259 LJFOLD(NEG KINT KINT) in LJFOLD()
261 LJFOLD(BOR KINT KINT) in LJFOLD()
268 LJFOLD(MIN KINT KINT) in LJFOLD()
300 LJFOLD(LT KINT KINT)
301 LJFOLD(GE KINT KINT) in LJFOLD() argument
302 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/sysutils/fluent-bit/fluent-bit-1.8.11/lib/luajit-2.1.0-1e66d0f/src/
H A Dlj_opt_fold.c290 LJFOLD(ADD KINT KINT)
291 LJFOLD(SUB KINT KINT)
292 LJFOLD(MUL KINT KINT)
293 LJFOLD(MOD KINT KINT)
294 LJFOLD(NEG KINT KINT)
296 LJFOLD(BOR KINT KINT)
303 LJFOLD(MIN KINT KINT)
335 LJFOLD(LT KINT KINT)
336 LJFOLD(GE KINT KINT)
337 LJFOLD(LE KINT KINT)
[all …]
/dports/www/nift/nsm-2.4.11/LuaJIT/src/
H A Dlj_opt_fold.c266 LJFOLD(ADD KINT KINT)
267 LJFOLD(SUB KINT KINT) in LJFOLD() argument
268 LJFOLD(MUL KINT KINT) in LJFOLD()
269 LJFOLD(MOD KINT KINT) in LJFOLD()
270 LJFOLD(NEG KINT KINT) in LJFOLD()
272 LJFOLD(BOR KINT KINT) in LJFOLD()
279 LJFOLD(MIN KINT KINT) in LJFOLD()
311 LJFOLD(LT KINT KINT)
312 LJFOLD(GE KINT KINT) in LJFOLD() argument
313 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/benchmarks/sysbench/sysbench-1.0.20/third_party/luajit/luajit/src/
H A Dlj_opt_fold.c266 LJFOLD(ADD KINT KINT)
267 LJFOLD(SUB KINT KINT) in LJFOLD() argument
268 LJFOLD(MUL KINT KINT) in LJFOLD()
269 LJFOLD(MOD KINT KINT) in LJFOLD()
270 LJFOLD(NEG KINT KINT) in LJFOLD()
272 LJFOLD(BOR KINT KINT) in LJFOLD()
279 LJFOLD(MIN KINT KINT) in LJFOLD()
311 LJFOLD(LT KINT KINT)
312 LJFOLD(GE KINT KINT) in LJFOLD() argument
313 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/graphics/urho3d/Urho3D-1.7.1/Source/ThirdParty/LuaJIT/src/
H A Dlj_opt_fold.c259 LJFOLD(ADD KINT KINT)
260 LJFOLD(SUB KINT KINT) in LJFOLD() argument
261 LJFOLD(MUL KINT KINT) in LJFOLD()
262 LJFOLD(MOD KINT KINT) in LJFOLD()
263 LJFOLD(NEG KINT KINT) in LJFOLD()
265 LJFOLD(BOR KINT KINT) in LJFOLD()
272 LJFOLD(MIN KINT KINT) in LJFOLD()
304 LJFOLD(LT KINT KINT)
305 LJFOLD(GE KINT KINT) in LJFOLD() argument
306 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/lang/luajit-openresty/luajit2-2.1-20211210/src/
H A Dlj_opt_fold.c290 LJFOLD(ADD KINT KINT)
291 LJFOLD(SUB KINT KINT) in LJFOLD() argument
292 LJFOLD(MUL KINT KINT) in LJFOLD()
293 LJFOLD(MOD KINT KINT) in LJFOLD()
294 LJFOLD(NEG KINT KINT) in LJFOLD()
296 LJFOLD(BOR KINT KINT) in LJFOLD()
303 LJFOLD(MIN KINT KINT) in LJFOLD()
335 LJFOLD(LT KINT KINT)
336 LJFOLD(GE KINT KINT) in LJFOLD() argument
337 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/lang/luajit-devel/LuaJIT-a91d0d9/src/
H A Dlj_opt_fold.c290 LJFOLD(ADD KINT KINT)
291 LJFOLD(SUB KINT KINT) in LJFOLD() argument
292 LJFOLD(MUL KINT KINT) in LJFOLD()
293 LJFOLD(MOD KINT KINT) in LJFOLD()
294 LJFOLD(NEG KINT KINT) in LJFOLD()
296 LJFOLD(BOR KINT KINT) in LJFOLD()
303 LJFOLD(MIN KINT KINT) in LJFOLD()
335 LJFOLD(LT KINT KINT)
336 LJFOLD(GE KINT KINT) in LJFOLD() argument
337 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/misc/xplr/xplr-0.17.0/cargo-crates/luajit-src-210.3.2+resty1085a4d/luajit2/src/
H A Dlj_opt_fold.c290 LJFOLD(ADD KINT KINT)
291 LJFOLD(SUB KINT KINT) in LJFOLD() argument
292 LJFOLD(MUL KINT KINT) in LJFOLD()
293 LJFOLD(MOD KINT KINT) in LJFOLD()
294 LJFOLD(NEG KINT KINT) in LJFOLD()
296 LJFOLD(BOR KINT KINT) in LJFOLD()
303 LJFOLD(MIN KINT KINT) in LJFOLD()
335 LJFOLD(LT KINT KINT)
336 LJFOLD(GE KINT KINT) in LJFOLD() argument
337 LJFOLD(LE KINT KINT) in LJFOLD()
[all …]
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/densfit/
H A Ddf_dofit.f9039 integer(KINT) :: n_basis, n_fit
77 integer(KINT), intent(in) :: index_A, index_B, ld_DM
80 integer(KINT), intent(out) :: ierr
84 integer(KINT) :: n_fit, n_fit_A, n_fit_B
149 integer(KINT), intent(in) :: n_fit, ld_weight_matrix
150 integer(KINT), intent(out) :: info
209 integer(KINT), intent(in) :: index
238 integer(KINT), intent(out) :: ierr
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/abacus/
H A Dabapcm.F117 KINT = KJ1AO + NNBASX
119 KINVMT = KINT + NNBASX*NCOMP
166 CALL GET1IN(WORK(KINT),'PCMB2SL',NREAD,WORK(KLAST),LWRK,
179 & WORK(KINT+(ICOMP - 1)*NNBASX),1,VEC2(1+(ICOMP-1
187 & WORK(KINT+(ICOMP - 1)*NNBASX),1)
H A Dabaltra.F684 KINT = 1
685 KIINT = KINT + LBUF
689 CALL READI4(LULONA,LENINT4,WRK(KINT))
705 H2LAO(INDAO(JP,JQ),JRS) = WRK(KINT + I - 1)
707 & -WRK(KINT + I - 1)
709 H2LAO(INDAO(JQ,JP),-JRS) = -WRK(KINT + I - 1)
714 H2LAO(INDAO(JR,JS),JPQ) = WRK(KINT + I - 1)
716 & -WRK(KINT + I -1)
718 H2LAO(INDAO(JS,JR),-JPQ) = -WRK(KINT + I - 1)
/dports/math/math77/MATH77/
H A Ddintm.f437 integer KREAL, KINT, KLOG, ITEMP local
438 parameter (KINT=29, KREAL=169, KLOG=11)
440 integer IMOVE(KINT)
458 do 15 ITEMP = 1, KINT
H A Dsintm.f437 integer KREAL, KINT, KLOG, ITEMP local
438 parameter (KINT=29, KREAL=169, KLOG=11)
440 integer IMOVE(KINT)
458 do 15 ITEMP = 1, KINT
H A Ddintma.f60 integer DIMS, KDBLE, KINT, KLOG, KREAL local
62 parameter (DIMS=5, KDBLE=4, KINT=29, KLOG=11, KREAL=169)
134 integer LC, ISAVE(KINT,DIMS)
165 integer IMOVE(KINT)
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/
H A Dcc_landf3.F552 KINT = 1
553 KVECIS = KINT + N2BST(ISALBE)
555 KVECIB = KINT + NRHF(ISYMI)*N2BST(ISALBE)
570 CALL CCSD_SYMSQ(DSRHF(KOFF1),ISALBE,WORK(KINT))
575 * WORK(KINT),1)
584 KOFF2 = KINT + N2BST(ISALBE)*(I - 1)
592 CALL DGEMV('T',N2BST(ISALBE),NRHF(ISYMI),TWO,WORK(KINT),NTALBE,
633 KINT = 1
634 KSCR1 = KINT + N2BST(ISALBE)
648 CALL CCSD_SYMSQ(DSRHF(KOFFPI),ISALBE,WORK(KINT))
[all …]
H A Dcc_qm3.F1206 KINT = KWRK1
1207 KWRK2 = KINT + N2BST(ISYMOP)
1212 CALL DZERO(WORK(KINT),N2BST(ISYMOP))
1228 CALL CC_PRFCKAO(WORK(KINT),ISYMOP)
1280 TAL1 = DDOT(N2BST(ISYMOP),WORK(KINT),1,WORK(KINT),1)
1770 KINT = KWRK1
1771 KWRK2 = KINT + N2BST(ISYMOP)
1814 TAL1 = DDOT(N2BST(ISYMOP),WORK(KINT),1,WORK(KINT),1)
4142 KINT = 1
4143 KWRK1 = KINT + N2BST(ISYMOP)
[all …]
H A Dcc_qmmm.F87 KINT = KTAO + NNBASX
88 KWRK1 = KINT + N2BST(ISYMOP)
94 CALL DZERO(WORK(KINT),N2BST(ISYMOP))
128 CALL CCMMINT(LABEL,-1,WORK(KINT),WORK(KTAO),
159 CALL DAXPY(N2BST(ISYMOP),ONE,WORK(KINT),1,FOCK,1)
235 KINT = KTAO + NNBASX
236 KWRK1 = KINT + N2BST(ISYMOP)
242 CALL DZERO(WORK(KINT),N2BST(ISYMOP))
273 CALL CCMMINT(LABEL,-1,WORK(KINT),WORK(KTAO),
1682 KINT = KNSAO + NNBASX
[all …]

1234