Home
last modified time | relevance | path

Searched refs:NCOL (Results 1 – 25 of 1274) sorted by relevance

12345678910>>...51

/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/hopspack/community_problems/modflw96.3_3/src/
H A Devt5.f83 DIMENSION IEVT(NCOL,NROW),EVTR(NCOL,NROW),EXDP(NCOL,NROW),
84 1 SURF(NCOL,NROW),DELR(NCOL),DELC(NROW)
131 DO 40 IC=1,NCOL
172 DIMENSION IEVT(NCOL,NROW),EVTR(NCOL,NROW),EXDP(NCOL,NROW),
173 1 SURF(NCOL,NROW),RHS(NCOL,NROW,NLAY),
174 2 HCOF(NCOL,NROW,NLAY),IBOUND(NCOL,NROW,NLAY),
180 DO 10 IC=1,NCOL
228 DIMENSION IEVT(NCOL,NROW),EVTR(NCOL,NROW),EXDP(NCOL,NROW),
229 1 SURF(NCOL,NROW),IBOUND(NCOL,NROW,NLAY),
230 2 VBVL(4,MSUM),HNEW(NCOL,NROW,NLAY),BUFF(NCOL,NROW,NLAY)
[all …]
H A Dgfd1.f224 1 HOLD(NCOL,NROW,NLAY),SC1(NCOL,NROW,NLAY),HNEW(NCOL,NROW,NLAY),
225 2 IBOUND(NCOL,NROW,NLAY),CR(NCOL,NROW,NLAY),
226 3 CC(NCOL,NROW,NLAY),CV(NCOL,NROW,NLAY),CDTR(NCOL,NROW,NLAY),
227 4 CDTC(NCOL,NROW,NLAY),BOT(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),
363 1 HOLD(NCOL,NROW,NLAY), SC1(NCOL,NROW,NLAY),
364 2 CR(NCOL,NROW,NLAY), CC(NCOL,NROW,NLAY),
367 5 TOP(NCOL,NROW,NLAY),BUFF(NCOL,NROW,NLAY)
477 1 CDTR(NCOL,NROW,NLAY),CR(NCOL,NROW,NLAY),
478 2 CC(NCOL,NROW,NLAY),CV(NCOL,NROW,NLAY),
577 1 CR(NCOL,NROW,NLAY), CC(NCOL,NROW,NLAY), CV(NCOL,NROW,NLAY),
[all …]
H A Dibs1.f123 NIJ=NROW*NCOL
196 DIMENSION RHS(NCOL,NROW,NLAY),HCOF(NCOL,NROW,NLAY),
197 1 IBOUND(NCOL,NROW,NLAY),HNEW(NCOL,NROW,NLAY),
198 2 HOLD(NCOL,NROW,NLAY),HC(NCOL,NROW,NLAY),
199 3 SCE(NCOL,NROW,NLAY),SCV(NCOL,NROW,NLAY)
244 DIMENSION IBOUND(NCOL,NROW,NLAY),HOLD(NCOL,NROW,NLAY),
245 1 HNEW(NCOL,NROW,NLAY),HC(NCOL,NROW,NLAY),
246 2 SCE(NCOL,NROW,NLAY),SCV(NCOL,NROW,NLAY),
248 4 BUFF(NCOL,NROW,NLAY),DELR(NCOL),DELC(NROW)
268 DO 5 IC=1,NCOL
[all …]
H A Dbcf5.f173 1 HY(NCOL,NROW,NLAY),CR(NCOL,NROW,NLAY),CC(NCOL,NROW,NLAY),
174 2 CV(NCOL,NROW,NLAY),DELR(NCOL),DELC(NROW),BOT(NCOL,NROW,NLAY),
307 1 HOLD(NCOL,NROW,NLAY),SC1(NCOL,NROW,NLAY),HNEW(NCOL,NROW,NLAY),
309 3 CC(NCOL,NROW,NLAY),CV(NCOL,NROW,NLAY),HY(NCOL,NROW,NLAY),
310 4 TRPY(NLAY),BOT(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),DELR(NCOL),
312 6 CVWD(NCOL,NROW,NLAY),BUFF(NCOL,NROW,NLAY)
672 2 SC2(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),BUFF(NCOL,NROW,NLAY)
976 1,CR(NCOL,NROW,NLAY), CC(NCOL,NROW,NLAY), CV(NCOL,NROW,NLAY)
978 3,BOT(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),WETDRY(NCOL,NROW,NLAY)
979 4,CVWD(NCOL,NROW,NLAY),BUFF(NCOL,NROW,NLAY)
[all …]
H A Dres1.f3 2 NPTS,NCOL,NROW)
121 DIMENSION IRES(NCOL,NROW),IRESL(NCOL,NROW),BRES(NCOL,NROW),
122 1 CRES(NCOL,NROW),BBRES(NCOL,NROW),HRESSE(2,NRES),
123 2 IBOUND(NCOL,NROW,NLAY),ANAME(6,5),DELR(NCOL),DELC(NROW)
249 1 BRES(NCOL,NROW),DELR(NCOL),DELC(NROW)
302 DIMENSION IRES(NCOL,NROW),IRESL(NCOL,NROW),BRES(NCOL,NROW),
303 1 CRES(NCOL,NROW),BBRES(NCOL,NROW),HRES(NRES),
304 2 IBOUND(NCOL,NROW,NLAY),HNEW(NCOL,NROW,NLAY),
305 3 HCOF(NCOL,NROW,NLAY),RHS(NCOL,NROW,NLAY)
375 DIMENSION IRES(NCOL,NROW),IRESL(NCOL,NROW),BRES(NCOL,NROW),
[all …]
H A Drch5.f80 DIMENSION IRCH(NCOL,NROW),RECH(NCOL,NROW),DELR(NCOL),DELC(NROW)
114 DO 50 IC=1,NCOL
143 DIMENSION IRCH(NCOL,NROW),RECH(NCOL,NROW),
144 1 RHS(NCOL,NROW,NLAY),IBOUND(NCOL,NROW,NLAY)
151 DO 10 IC=1,NCOL
164 DO 20 IC=1,NCOL
181 DO 30 IC=1,NCOL
212 DIMENSION IRCH(NCOL,NROW),RECH(NCOL,NROW),
213 1 IBOUND(NCOL,NROW,NLAY),BUFF(NCOL,NROW,NLAY),
226 DO 2 IC=1,NCOL
[all …]
H A Dtlk1.f187 NCR=NCOL*NROW
307 DIMENSION HNEW(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),
308 1 RATE(NCOL,NROW,NUMC),ZCB(NCOL,NROW,NUMC),TLK(NCOL,NROW,NUMC),
309 2 TL(NCOL,NROW,NUMC),SLU(NCOL,NROW,NUMC),SLD(NCOL,NROW,NUMC),
467 DIMENSION HNEW(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),
468 1 TL(NCOL,NROW,NUMC),TLK(NCOL,NROW,NUMC),SLU(NCOL,NROW,NUMC),
469 2 SLD(NCOL,NROW,NUMC),CV(NCOL,NROW,NLAY),HCOF(NCOL,NROW,NLAY),
470 3 RHS(NCOL,NROW,NLAY),IBOUND(NCOL,NROW,NLAY),RATE(NCOL,NROW,NUMC)
548 DIMENSION HNEW(NCOL,NROW,NLAY),TOP(NCOL,NROW,NLAY),
549 1 TLK(NCOL,NROW,NUMC),TL(NCOL,NROW,NUMC),SLU(NCOL,NROW,NUMC),
[all …]
H A Dmodflw96.f126 3 NCOL,NROW,NLAY,IOUT,ID4DIM)
138 2 NRESOP,IRESPT,NPTS,NCOL,NROW)
229 1 NCOL,NROW,NLAY)
268 2 X(LCHCOF),X(LCRHS),NROW,NCOL,NLAY)
270 1 X(LCIBOU),NCOL,NROW,NLAY,NWELVL)
277 1 X(LCHNEW),NCOL,NROW,NLAY)
281 1 X(LCRHS),X(LCIBOU),NCOL,NROW,NLAY)
284 2 X(LCRHS),NRES,NRESOP,NCOL,NROW,NLAY)
293 1 X(LCBDFV),NFLW,NCOL,NROW,NLAY,IFHBD4)
344 IC2=NCOL
[all …]
H A Dde45.f198 2 CR(NCOL,NROW,NLAY),CC(NCOL,NROW,NLAY),
199 3 CV(NCOL,NROW,NLAY),HCOF(NCOL,NROW,NLAY),
503 DIMENSION IEQPNT(NCOL,NROW,NLAY), IBOUND(NCOL,NROW,NLAY)
571 IF(I1.GT.NCOL) I1=NCOL
590 IF(I1.GT.NCOL) I1=NCOL
651 IF(I1.GT.NCOL) I1=NCOL
670 IF(I1.GT.NCOL) I1=NCOL
686 IF(K1.GT.NCOL) K1=NCOL
705 IF(K1.GT.NCOL) K1=NCOL
726 IF(K1.GT.NCOL) K1=NCOL
[all …]
H A Dutl5.f12 DIMENSION BUFF(NCOL,NROW,NLAY)
118 DIMENSION BUF(NCOL,NROW)
138 NSTRIP=(NCOL-1)/NCAP + 1
148 IF(J2.GT.NCOL) J2=NCOL
275 DIMENSION BUF(NCOL,NROW)
412 DIMENSION BUF(NCOL,NROW),TEXT(4)
1080 DIMENSION BUFF(NCOL,NROW,NLAY),IBOUND(NCOL,NROW,NLAY)
1110 DIMENSION IBOUND(NCOL,NROW,NLAY)
1137 ICRL= (K-1)*NROW*NCOL + (I-1)*NCOL + J
1158 DIMENSION BUFF(NCOL,NROW,NLAY),IBUFF(NCOL,NROW),
[all …]
H A Dpcg2.f35 NRC=NROW*NCOL
205 IF(N.GE.NCOL+1) CC(N-NCOL)=0.
214 NRN=N+NCOL
215 NRL=N-NCOL
225 NRB=N-NCOL
358 NRB=N-NCOL
426 IC=N-NCOL
521 NR=N+NCOL
576 NRN=N+NCOL
577 NRL=N-NCOL
[all …]
H A Dbas5.f164 ISUM=ISUM+NCOL
208 DIMENSION HNEW(NCOL,NROW,NLAY), HOLD(NCOL,NROW,NLAY)
222 DO 10 J=1,NCOL
371 DIMENSION HNEW(NCOL,NROW,NLAY),STRT(NCOL,NROW,NLAY),
423 DIMENSION HNEW(NCOL,NROW,NLAY),IBOUND(NCOL,NROW,NLAY),
424 1 STRT(NCOL,NROW,NLAY),HOLD(NCOL,NROW,NLAY),
470 DO 400 J=1,NCOL
479 DO 500 J=1,NCOL
573 1 BUFF(NCOL,NROW,NLAY),STRT(NCOL,NROW,NLAY),
599 DO 58 J=1,NCOL
[all …]
/dports/math/scilab/scilab-6.1.1/scilab/modules/cacsd/src/slicot/
H A Dib01qd.f376 NCOL = NM
378 $ NCOL = NCOL + N
379 MINSMP = NCOL
429 NCP1 = NCOL + 1
436 MINWLS = NCOL*NCP1
442 IA = 2*NCOL
461 $ NCOL + NCOL*ILAENV( 1, 'DGEQRF', ' ', NSMP-M,
470 $ MAX( NCOL*ILAENV( 1, 'DGEQRF', ' ', NSMPL, NCOL,
537 INIH = INIR + NCOL*NCOL
962 $ CALL DLASET( 'Lower', NCOL-1, NCOL-1, ZERO, ZERO,
[all …]
H A Dib01cd.f499 $ NCOL, NCP1, NM, NN, NSMPL local
536 NCOL = NM
538 $ NCOL = NCOL + N
539 MINSMP = NCOL
550 NCOL = N
608 NCP1 = NCOL + 1
619 MINWLS = NCOL*NCP1
624 IA = M + MAX( 2*NCOL, M )
626 IA = 2*NCOL
632 LDW3 = MINWLS + MAX( IQ*NCP1 + ITAU, 6*NCOL )
[all …]
/dports/graphics/pgplot/pgplot/src/
H A Dpgscrn.f60 INTEGER I, IR, IG, IB, J, L, NCOL, UNIT, IOS local
65 SAVE NCOL, CNAME, RR, RG, RB
66 DATA NCOL/0/
70 IF (NCOL.EQ.0) THEN
87 NCOL = NCOL+1
88 CALL GRTOUP(CNAME(NCOL), TEXT(J:))
89 RR(NCOL) = IR/255.0
90 RG(NCOL) = IG/255.0
91 RB(NCOL) = IB/255.0
100 DO 20 I=1,NCOL
[all …]
/dports/graphics/pgplot/pgplot/examples/
H A Dpgdemo9.f6 INTEGER N, NCOL, NLEV variable
7 PARAMETER (N=64, NCOL=32, NLEV=9)
26 IA(I,J) = (F(I,J)-FMIN)/(FMAX-FMIN)*(NCOL-1)+16
35 IF (CI2.LT. 15+NCOL) THEN
37 1 15+NCOL,' colors'
47 DO 30 I=1,NCOL
48 R = REAL(I-1)/REAL(NCOL-1)*0.8 + 0.2
49 G = MAX(0.0, 2.0*REAL(I-1-NCOL/2)/REAL(NCOL-1))
50 B = 0.2 + 0.4*REAL(NCOL-I)/REAL(NCOL)
/dports/math/cmlib/cmlib-3.0_8/src/sudsods/
H A Dcscale.f2 SUBROUTINE CSCALE(A,NRDA,NROW,NCOL,COLS,COLSAV,ROWS,ROWSAV,ANORM, argument
10 DIMENSION A(NRDA,NCOL),COLS(NCOL),COLSAV(NCOL),SCALES(NCOL),
19 DO 5 K=1,NCOL
22 10 ASCALE=ANORM/FLOAT(NCOL)
23 DO 20 K=1,NCOL
29 25 DO 30 K=1,NCOL
35 DO 100 K=1,NCOL
55 ROWS(K)=SDOT(NCOL,A(K,1),NRDA,A(K,1),NRDA)
/dports/science/afni/afni-AFNI_21.3.16/src/
H A Dcolcalc.f57 NCOL = 0
72 NCOL = INUMC( C_EXPR )
75 IF( NCOL .LE. 0 )THEN
82 IF( NCMAX .GT. NCOL )THEN
83 WRITE(*,1029) NCMAX , NCOL
89 NCOL = MIN( NCOL , NCMAX )
92 IF( NCOL .EQ. 0 )THEN
126 IF( NCOL .GT. 0 )
127 X READ(77,*,END=9000,ERR=9000) ( R8VAL(I) , I=1,NCOL )
144 IF( NCOL.GT.0 .OR. IROW.LT.NROW )GOTO 1100
/dports/math/slatec/src/
H A Dssilus.f3 + NU, IU, JU, U, NROW, NCOL)
165 + NCOL(N), NROW(N)
177 NCOL(I) = 0
187 NCOL(ICOL) = NCOL(ICOL) + 1
190 IF( ISYM.NE.0 ) NCOL(IA(J)) = NCOL(IA(J)) + 1
201 NCOL(ICOL) = JU(ICOL)
214 IU(NCOL(ICOL)) = IROW
215 U(NCOL(ICOL)) = A(J)
216 NCOL(ICOL) = NCOL(ICOL) + 1
225 U(NCOL(IROW)) = A(J)
[all …]
H A Ddsilus.f3 + NU, IU, JU, U, NROW, NCOL)
166 + NCOL(N), NROW(N)
178 NCOL(I) = 0
188 NCOL(ICOL) = NCOL(ICOL) + 1
191 IF( ISYM.NE.0 ) NCOL(IA(J)) = NCOL(IA(J)) + 1
202 NCOL(ICOL) = JU(ICOL)
215 IU(NCOL(ICOL)) = IROW
216 U(NCOL(ICOL)) = A(J)
217 NCOL(ICOL) = NCOL(ICOL) + 1
226 U(NCOL(IROW)) = A(J)
[all …]
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/hopspack/community_problems/hopspack_forms/case_hc/
H A Dfeval.f43 INTEGER NROW,NLAY,NCOL
46 PARAMETER(NCOL = 100)
52 REAL*8 HEAD(NROW,NCOL,NLAY), DRWDOWN(DIM), STARTHEAD(DIM)
108 & NROW, NCOL,FLAG)
150 call readhead(NROW,NCOL,NLAY,HEAD,hedfile)
157 call costac(DIM/3,X,Y,Z,WELRATE,NLAY,NROW,NCOL,COSTC,FLAG)
161 call costao(DIM/3,X,Y,Z,WELRATE,HEAD,NLAY,NROW,NCOL,COSTO,FLAG)
168 & NCOL,COSTO,FLAG)
/dports/graphics/raster3d/Raster3D_3.0-7/
H A Dballs.f89 NCOL = 0
94 NCOL = NCOL + 1
95 IF (NCOL.GT.MAXCOL) THEN
100 READ(CARD,'(6X,A24,3F8.3,F6.2)') MASK(NCOL),
101 & (RGB(I,NCOL),I=1,3),RADIUS(NCOL)
121 IF (NCOL.LT.MAXCOL-8) THEN
123 NCOL = NCOL + 1
124 READ(defcol(i),'(6X,A24,3F8.3,F6.2)') MASK(NCOL),
125 & (RGB(J,NCOL),J=1,3), RADIUS(NCOL)
129 IF (NCOL.EQ.0) THEN
[all …]
/dports/science/erd/erd-3.0.6/src/
H A Derd__transpose_batch.f17 + ( NROW,NCOL,
57 INTEGER NROW,NCOL
60 DOUBLE PRECISION BATCH (1:NROW,1:NCOL)
61 DOUBLE PRECISION OBATCH (1:NCOL,1:NROW)
72 DO 110 II = 1,NCOL,TILE
73 IEND = MIN (NCOL,II+TILE-1)
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/hopspack/community_problems/hopspack_forms/case_unc5/
H A Dfeval.f43 INTEGER NROW,NLAY,NCOL
47 PARAMETER(NCOL = 50)
54 REAL*8 HEAD(NROW,NCOL,NLAY), DRWDOWN(DIM), STARTHEAD(DIM)
113 & NROW, NCOL,FLAG)
158 call readhead(NROW,NCOL,NLAY,HEAD,hedfile)
165 call costac(DIM/2,X,Y,Z,WELRATE,NLAY,NROW,NCOL,COSTC,FLAG)
169 call costao(DIM/2,X,Y,Z,WELRATE,HEAD,NLAY,NROW,NCOL,COSTO,FLAG)
176 & NCOL,COSTO,FLAG)
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/hopspack/community_problems/hopspack_forms/case_con5/
H A Dfeval.f43 INTEGER NROW,NLAY,NCOL
47 PARAMETER(NCOL = 50)
54 REAL*8 HEAD(NROW,NCOL,NLAY), DRWDOWN(DIM), STARTHEAD(DIM)
113 & NROW, NCOL,FLAG)
158 call readhead(NROW,NCOL,NLAY,HEAD,hedfile)
165 call costac(DIM/2,X,Y,Z,WELRATE,NLAY,NROW,NCOL,COSTC,FLAG)
169 call costao(DIM/2,X,Y,Z,WELRATE,HEAD,NLAY,NROW,NCOL,COSTO,FLAG)
176 & NCOL,COSTO,FLAG)

12345678910>>...51