Home
last modified time | relevance | path

Searched refs:iny (Results 1 – 25 of 1085) sorted by relevance

12345678910>>...44

/dports/science/dynare/dynare-4.6.4/contrib/dmm/
H A Dikf.for166 COM(1:iny,1:iny) = Fi(1:iny,1:iny)
167 C CALL F02FAF('N','U',iny,COM(1:iny,1:iny),iny,W1(1:iny),
169 CALL DSYEV('N','U',iny,COM(1:iny,1:iny),iny,W1(1:iny),WORK1,
180 COM(1:iny,1:iny) = Fi(1:iny,1:iny)
182 C CALL F01ADF(iny,COM(1:iny+1,1:iny),iny+1,IFAIL)
208 CALL INVFBIS(Fs(1:iny,1:iny),Fi(1:iny,1:iny),iny,FiRANK,
209 1 Fsm(1:iny,1:iny),Fim(1:iny,1:iny),FFF(1:iny,1:iny))
211 CALL INVF(Fs(1:iny,1:iny),Fi(1:iny,1:iny),iny,FiRANK,
212 1 Fsm(1:iny,1:iny),Fim(1:iny,1:iny),FFF(1:iny,1:iny))
274 C CALL F03ABF(Fsm(1:iny,1:iny)+Fim(1:iny,1:iny),iny,iny,
[all …]
H A Dks.for176 COM(1:iny,1:iny) = Fi(1:iny,1:iny)
177 C CALL F02FAF('N','U',iny,COM(1:iny,1:iny),iny,W1(1:iny),
179 CALL DSYEV('N','U',iny,COM(1:iny,1:iny),iny,W1(1:iny),
191 COM(1:iny,1:iny) = Fi(1:iny,1:iny)
218 CALL INVFBIS(Fs(1:iny,1:iny),Fi(1:iny,1:iny),iny,FiRANK,
219 1 Fsm(1:iny,1:iny),Fim(1:iny,1:iny),FFF(1:iny,1:iny))
221 CALL INVF(Fs(1:iny,1:iny),Fi(1:iny,1:iny),iny,FiRANK,
222 1 Fsm(1:iny,1:iny),Fim(1:iny,1:iny),FFF(1:iny,1:iny))
226 Vis(imain,1:iny,1:iny) = Fsm(1:iny,1:iny)
227 Vii(imain,1:iny,1:iny) = Fim(1:iny,1:iny)
[all …]
H A Dkf.for86 DO 40 I=1,iny
99 DO 55 J=1,iny
124 COM(1:iny,1:iny) = V(1:iny,1:iny)
126 C CALL F01ADF(iny,COM(1:iny+1,1:iny),iny+1,IFAIL)
127 CALL DPOTRF('L',iny,COM(1:iny,1:iny),iny,IFAIL) ! COM = L*L'
132 CALL DPOTRI('L',iny,COM(1:iny,1:ny),iny,IFAIL) ! COM = VV^-1
142 90 HPV(I,J) = SUM((HP1(1:iny,I)+RG(I,1:iny))*Vinv(1:iny,J))
145 100 XT(imain,I) = X1(I)+SUM(HPV(I,1:iny)*INN(1:iny))
149 + - SUM(HPV(I,1:iny)*(HP1(1:iny,I)+RG(I,1:iny)))
152 + - SUM(HPV(I,1:iny)*(HP1(1:iny,J)+RG(J,1:iny)))
[all …]
H A Dinnov.for112 DO 40 I=1,iny
126 DO 55 J=1,iny
150 COM(1:iny,1:iny) = V(1:iny,1:iny)
152 c CALL F01ADF(iny,COM(1:iny+1,1:iny),iny+1,IFAIL)
153 CALL DPOTRF('L',iny,COM(1:iny,1:iny),iny,IFAIL) ! COM = L*L'
154 CALL DPOTRI('L',iny,COM(1:iny,1:iny),iny,IFAIL) ! COM = VV^-1
164 90 HPV(I,J) = SUM((HP1(1:iny,I)+RG(I,1:iny))*Vinv(1:iny,J))
167 100 XT(I) = X1(I)+SUM(HPV(I,1:iny)*INN(imain,1:iny))
171 + - SUM(HPV(I,1:iny)*(HP1(1:iny,I)+RG(I,1:iny)))
174 + - SUM(HPV(I,1:iny)*(HP1(1:iny,J)+RG(J,1:iny)))
[all …]
H A Dgck.for132 DO 10 I=1,iny
146 COM(1:iny,1:iny) = VV(1:iny,1:iny)
148 C CALL F01ADF(iny,COM(1:iny+1,1:iny), iny+1, IFAIL)
149 CALL DPOTRF('L',iny,COM(1:iny,1:iny),iny,IFAIL) ! COM = L*L'
150 CALL DPOTRI('L',iny,COM(1:iny,1:iny),iny,IFAIL) ! COM = VV^-1
173 80 BHRG(I,J) = SUM(B(I,1:iny)*HRG(1:iny,J))
189 110 AA(I,J) = F(I,J,IS(5)) - SUM(B(I,1:iny)*HF(1:iny,J))
240 170 VVHF(I,J) = SUM(VV(I,1:iny)*HF(1:iny,J))
247 + + SUM(HF(1:iny,I)*VVHF(1:iny,J))
259 + + SUM(B(I,1:iny)*(yk(IT+1,IYK(IT+1,1:iny))
[all …]
H A Dkim.for180 DO 40 K=1,iny
195 DO 55 L=1,iny
198 DO 56 K=1,iny
219 COM(1:iny,1:iny) = V(1:iny,1:iny)
221 C CALL F01ADF(iny,COM(1:iny+1,1:iny),iny+1,IFAIL)
222 CALL DPOTRF('L',iny,COM(1:iny,1:iny),iny,IFAIL) ! COM = L*L'
227 CALL DPOTRI('L',iny,COM(1:iny,1:ny),iny,IFAIL) ! COM = VV^-1
237 90 HPV(K,L) = SUM((HP1(1:iny,K)+RG(K,1:iny))*VINV(1:iny,L))
244 + - SUM(HPV(K,1:iny)*(HP1(1:iny,K)+RG(K,1:iny)))
247 + - SUM(HPV(K,1:iny)*(HP1(1:iny,L)+RG(L,1:iny)))
[all …]
/dports/math/clblas/clBLAS-2.10/src/library/blas/trtri/
H A Dtriple_dgemm_update_128_16_R.cpp53 const int iny = get_local_id(1); \n
92 B += inx + __mul(iby + iny, ldb); \n
106 bs[inx][iny] = B[0 * ldb]; \n
107 bs[inx][iny + 4] = B[4 * ldb]; \n
108 bs[inx][iny + 8] = B[8 * ldb]; \n
109 bs[inx][iny + 12] = B[12 * ldb]; \n
173 B += inx + __mul(iby + iny, ldb); \n
183 bs[inx][iny] = B[0 * ldb]; \n
184 bs[inx][iny + 4] = B[4 * ldb]; \n
185 bs[inx][iny + 8] = B[8 * ldb]; \n
[all …]
H A Dtriple_dgemm_update_128_16_PART2_L.cpp49 const int iny = get_local_id(1); \n
75 B += inx + __mul(iby + iny, ldb); \n
85 bs[inx][iny] = B[0 * ldb]; \n
86 bs[inx][iny + 4] = B[4 * ldb]; \n
87 bs[inx][iny + 8] = B[8 * ldb]; \n
88 bs[inx][iny + 12] = B[12 * ldb]; \n
89 bs[inx + 4][iny] = B[4 + 0 * ldb]; \n
90 bs[inx + 4][iny + 4] = B[4 + 4 * ldb]; \n
91 bs[inx + 4][iny + 8] = B[4 + 8 * ldb]; \n
93 bs[inx + 8][iny] = B[8 + 0 * ldb]; \n
[all …]
H A Dtriple_dgemm_update_128_16_PART1_L.cpp50 const int iny = get_local_id(1); \n
90 B += inx + __mul(iby + iny, ldb); \n
104 bs[inx][iny] = B[0 * ldb]; \n
105 bs[inx][iny + 4] = B[4 * ldb]; \n
106 bs[inx][iny + 8] = B[8 * ldb]; \n
107 bs[inx][iny + 12] = B[12 * ldb]; \n
108 bs[inx + 4][iny] = B[4 + 0 * ldb]; \n
109 bs[inx + 4][iny + 4] = B[4 + 4 * ldb]; \n
110 bs[inx + 4][iny + 8] = B[4 + 8 * ldb]; \n
112 bs[inx + 8][iny] = B[8 + 0 * ldb]; \n
[all …]
/dports/devel/cc65/cc65-2.19/libsrc/atari/ser/
H A Datrrdev.s451 iny
452 iny
453 iny
477 iny
480 iny
484 iny
487 iny
491 iny
494 iny
498 iny
[all …]
/dports/math/clblas/clBLAS-2.10/src/library/blas/gens/clTemplates/
H A Ddtrsm_gpu.cl328 const int iny = get_local_id(1);
1150 const int id = inx + iny*16;
1252 const int id = inx + iny*16;
1342 const int id = inx + iny*16;
1444 const int id = inx + iny*16;
1534 const int id = inx + iny*16;
1636 const int id = inx + iny*16;
1739 const int id = inx + iny*16;
1830 const int id = inx + iny*16;
1877 const int id = inx + iny*16;
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/texas/
H A Dlab_reorder.F8 integer inx(12,*),iny(12,*)
27 iny(i,ics)=inx(i,ics)
179 call new_old(ncs,inx,iny,ncshell,ncfunct)
192 integer inx(12,*),iny(12,*) local
214 itypy=iny(12,icsy)
215 iatoy=iny(2,icsy)
216 icoby=iny(1,icsy)
217 icoey=iny(5,icsy)
218 igeny=iny(4,icsy)
219 ileny=iny(10,icsy)-iny(11,icsy)
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/texas/
H A Dlab_reorder.F8 integer inx(12,*),iny(12,*)
27 iny(i,ics)=inx(i,ics)
179 call new_old(ncs,inx,iny,ncshell,ncfunct)
192 integer inx(12,*),iny(12,*) local
214 itypy=iny(12,icsy)
215 iatoy=iny(2,icsy)
216 icoby=iny(1,icsy)
217 icoey=iny(5,icsy)
218 igeny=iny(4,icsy)
219 ileny=iny(10,icsy)-iny(11,icsy)
[all …]
/dports/x11/xscreensaver/xscreensaver-5.44/hacks/images/m6502/
H A Ddisco.asm11 iny
15 iny
18 iny
19 iny
20 iny
21 iny
/dports/emulators/x16-rom/x16-rom-r38/basic/
H A Dcode12.s41 iny
63 iny
69 nmary1 iny
74 iny
100 notflt iny
108 iny
109 iny
110 iny
122 notdim iny
124 iny
[all …]
H A Dcode15.s25 iny
28 iny
32 iny
40 iny
58 iny
61 iny
64 iny
67 iny
116 iny
122 iny
[all …]
H A Dcode2.s33 reser iny
44 iny
63 strng iny
69 nthis1 iny
83 reser2 iny
94 iny
98 iny
115 iny
134 iny
135 iny
[all …]
H A Dcode11.s76 iny
129 iny
135 iny
141 iny
145 iny
147 iny
149 iny
151 iny
153 iny
160 iny
[all …]
/dports/emulators/x16-rom/x16-rom-r38/geos/kernal/dlgbox/
H A Ddlgbox1g.s43 iny
46 iny
59 iny
62 iny
73 iny
74 iny
85 iny
88 iny
/dports/emulators/x16-rom/x16-rom-r38/kernal/fonts/
H A Dconio3b.s19 iny
22 iny
25 iny
28 iny
31 iny
34 iny
37 iny
/dports/misc/adios2/ADIOS2-2.7.1/examples/hello/bpFWriteCRead/
H A DFWriter.f908 integer :: i, j, inx, iny, irank, isize, ierr variable
23 iny = 4
24 allocate( data(inx, iny) )
26 do j=1,iny
28 data(i,j) = irank * inx * iny + (j-1)*inx + (i-1)
34 shape_dims(2) = iny
40 count_dims(2) = iny
/dports/emulators/x16-rom/x16-rom-r38/geos/kernal/graph/
H A Dinline.s25 @1: iny
34 iny
37 iny
40 iny
43 iny
46 iny
/dports/emulators/x16-rom/x16-rom-r38/geos/kernal/icon/
H A Dicon2.s47 iny
106 iny
107 iny
123 iny
126 iny
155 iny
156 iny
173 iny
174 iny
203 iny
[all …]
/dports/devel/cc65/cc65-2.19/libsrc/geos-common/drivers/
H A Dgeos-stdmou.s92 iny
96 iny
99 iny ; Skip high byte
101 iny
104 iny
128 iny
131 iny
134 iny
/dports/x11/xscreensaver/xscreensaver-5.44/hacks/
H A Dcrystal.c272 int inx, iny; member
596 int inx, iny; in draw_crystal() local
625 for (iny = 1; iny <= cryst->ny; iny++) { in draw_crystal()
652 iny = cryst->ny; in draw_crystal()
657 (int) (iny * cryst->b * in draw_crystal()
797 int inx, iny; in refresh_crystal() local
826 for (iny = 1; iny <= cryst->ny; iny++) { in refresh_crystal()
853 iny = cryst->ny; in refresh_crystal()
879 int inx, iny; in refresh_crystal() local
882 iny = NRAND(cryst->ny); in refresh_crystal()
[all …]

12345678910>>...44