/dports/math/vtk8/VTK-8.2.0/Filters/Geometry/Testing/Cxx/ |
H A D | TestStructuredAMRNeighbor.cxx | 33 #define KMAX(ext) ext[5] macro 80 KMIN(wholeExtent) = KMAX(wholeExtent) = in TestParentNeighbor() 81 KMIN(gridExtent) = KMAX(gridExtent) = in TestParentNeighbor() 91 KMIN(gridOverlap) = KMAX(gridOverlap) = in TestParentNeighbor() 154 KMIN(wholeExtent) = KMAX(wholeExtent) = in TestPartiallyOverlappingParent() 155 KMIN(gridExtent) = KMAX(gridExtent) = in TestPartiallyOverlappingParent() 165 KMIN(gridOverlap) = KMAX(gridOverlap) = in TestPartiallyOverlappingParent() 229 KMIN(wholeExtent) = KMAX(wholeExtent) = in TestChildNeighbor() 230 KMIN(gridExtent) = KMAX(gridExtent) = in TestChildNeighbor() 240 KMIN(gridOverlap) = KMAX(gridOverlap) = in TestChildNeighbor() [all …]
|
/dports/math/vtk9/VTK-9.1.0/Filters/Geometry/Testing/Cxx/ |
H A D | TestStructuredAMRNeighbor.cxx | 33 #define KMAX(ext) ext[5] macro 82 KMAX(neiExtent) = 0; in TestParentNeighbor() 91 KMIN(gridOverlap) = KMAX(gridOverlap) = KMIN(neiOverlap) = KMAX(neiOverlap) = 0; in TestParentNeighbor() 152 KMAX(neiExtent) = 0; in TestPartiallyOverlappingParent() 161 KMIN(gridOverlap) = KMAX(gridOverlap) = KMIN(neiOverlap) = KMAX(neiOverlap) = 0; in TestPartiallyOverlappingParent() 228 KMAX(neiExtent) = 0; in TestChildNeighbor() 237 KMIN(gridOverlap) = KMAX(gridOverlap) = KMIN(neiOverlap) = KMAX(neiOverlap) = 0; in TestChildNeighbor() 298 KMAX(neiExtent) = 0; in TestPartiallyOverlappingChild() 374 KMAX(neiExtent) = 0; in TestSameLevelSibling() 452 KMAX(neiExtent) = 0; in TestCoarseToFineNeighbor() [all …]
|
/dports/math/vtk6/VTK-6.2.0/Filters/Geometry/Testing/Cxx/ |
H A D | TestStructuredAMRNeighbor.cxx | 33 #define KMAX(ext) ext[5] macro 80 KMIN(wholeExtent) = KMAX(wholeExtent) = in TestParentNeighbor() 81 KMIN(gridExtent) = KMAX(gridExtent) = in TestParentNeighbor() 91 KMIN(gridOverlap) = KMAX(gridOverlap) = in TestParentNeighbor() 154 KMIN(wholeExtent) = KMAX(wholeExtent) = in TestPartiallyOverlappingParent() 155 KMIN(gridExtent) = KMAX(gridExtent) = in TestPartiallyOverlappingParent() 165 KMIN(gridOverlap) = KMAX(gridOverlap) = in TestPartiallyOverlappingParent() 229 KMIN(wholeExtent) = KMAX(wholeExtent) = in TestChildNeighbor() 230 KMIN(gridExtent) = KMAX(gridExtent) = in TestChildNeighbor() 240 KMIN(gridOverlap) = KMAX(gridOverlap) = in TestChildNeighbor() [all …]
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/cgcode/src_f77/ |
H A D | scgdrv.f | 592 KMAX = ICYCLE*NCE 600 2 RWORK(1),RWORK(N+1),RWORK(2*N+1),RWORK(2*N+KMAX+2), 601 3 RWORK(2*N+2*KMAX+3),IERROR) 606 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR) 611 3 RWORK(5*N+1),RWORK(5*N+KMAX+2),RWORK(5*N+2*KMAX+3),IERROR) 615 2 RWORK(1),RWORK(N+1),RWORK(2*N+1),RWORK(2*N+KMAX+2), 616 3 RWORK(2*N+2*KMAX+3),IERROR) 621 3 RWORK(2*N+2*KMAX+3),IERROR) 626 3 RWORK(2*N+2*KMAX+3),IERROR) 631 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR) [all …]
|
H A D | dcgdrv.f | 592 KMAX = ICYCLE*NCE 600 2 RWORK(1),RWORK(N+1),RWORK(2*N+1),RWORK(2*N+KMAX+2), 601 3 RWORK(2*N+2*KMAX+3),IERROR) 606 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR) 611 3 RWORK(5*N+1),RWORK(5*N+KMAX+2),RWORK(5*N+2*KMAX+3),IERROR) 615 2 RWORK(1),RWORK(N+1),RWORK(2*N+1),RWORK(2*N+KMAX+2), 616 3 RWORK(2*N+2*KMAX+3),IERROR) 621 3 RWORK(2*N+2*KMAX+3),IERROR) 626 3 RWORK(2*N+2*KMAX+3),IERROR) 631 3 RWORK(3*N+KMAX+2),RWORK(3*N+2*KMAX+3),IERROR) [all …]
|
/dports/math/octave-forge-tsa/tsa-4.6.3/inst/ |
H A D | acovf.m | 56 KMAX = lc-1; variable 57 elseif (KMAX >= lc-1) 58 KMAX = lc-1; variable 61 ACF = zeros(lr,KMAX+1); 65 elseif (KMAX*KMAX > lc*log2(lc)) % & isempty(MISSES); 67 elseif (10*KMAX > lc); 78 if Mode2==1; % KMAX*KMAX > lc*log(lc); % O(n.logn)+O(K) 102 if Mode2==1; % KMAX*KMAX > lc*log(lc); % O(n.logn)+O(K) 105 NN = tmp(1:KMAX+1,:)'; 137 % ACF=ACF./((lc-MISSES)*ones(1,KMAX+1) - ones(lr,1)*(0:KMAX)); [all …]
|
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | mumps_type2_blocking.F | 19 INTEGER NSLAVESMIN, NASS, KMAX local 49 KMAX=int(abs(K821)) 61 & real(KMAX))))/ 86 INTEGER NSLAVESMAX, KMAX, KMIN local 214 & KMIN, KMAX, SLAVEF, argument 350 & KMIN, KMAX, SLAVEF, 411 INTEGER KMAX, NPIV, local 548 KMIN = min(KMIN,KMAX) 557 INTEGER KMAX local 563 KMAX = int(KEEP821) [all …]
|
/dports/math/cmlib/cmlib-3.0_8/src/snls1e/ |
H A D | qrfac.f | 83 INTEGER I,J,JP1,K,KMAX,MINMN 107 KMAX = J 109 IF (SIGMA(K) .GT. SIGMA(KMAX)) KMAX = K 111 IF (KMAX .EQ. J) GO TO 40 114 A(I,J) = A(I,KMAX) 115 A(I,KMAX) = TEMP 117 SIGMA(KMAX) = SIGMA(J) 118 WA(KMAX) = WA(J) 120 IPVT(J) = IPVT(KMAX) 121 IPVT(KMAX) = K
|
/dports/math/slatec/src/ |
H A D | dqrfac.f | 91 INTEGER I,J,JP1,K,KMAX,MINMN 115 KMAX = J 117 IF (SIGMA(K) .GT. SIGMA(KMAX)) KMAX = K 119 IF (KMAX .EQ. J) GO TO 40 122 A(I,J) = A(I,KMAX) 123 A(I,KMAX) = TEMP 125 SIGMA(KMAX) = SIGMA(J) 126 WA(KMAX) = WA(J) 128 IPVT(J) = IPVT(KMAX) 129 IPVT(KMAX) = K
|
H A D | qrfac.f | 88 INTEGER I,J,JP1,K,KMAX,MINMN 113 KMAX = J 115 IF (SIGMA(K) .GT. SIGMA(KMAX)) KMAX = K 117 IF (KMAX .EQ. J) GO TO 40 120 A(I,J) = A(I,KMAX) 121 A(I,KMAX) = TEMP 123 SIGMA(KMAX) = SIGMA(J) 124 WA(KMAX) = WA(J) 126 IPVT(J) = IPVT(KMAX) 127 IPVT(KMAX) = K
|
/dports/devel/isa-l/isa-l-2.30.0/erasure_code/ |
H A D | gf_inverse_test.c | 46 #define KMAX TEST_SOURCES macro 145 printf("gf_inverse_test: max=%d ", KMAX); in main() 147 test_mat = malloc(KMAX * KMAX); in main() 148 save_mat = malloc(KMAX * KMAX); in main() 149 invr_mat = malloc(KMAX * KMAX); in main() 181 k = KMAX; in main() 202 k = rand() % KMAX; in main()
|
/dports/misc/libemos/libemos-4.5.9-Source/gribex/ |
H A D | maxmni.F | 11 SUBROUTINE MAXMNI(KARRAY,KLEN,KMAX,KMIN) argument 77 INTEGER KARRAY, KLEN, KMAX, KMIN 92 KMAX = KARRAY(1) 98 KMAX = MAX(KMAX,KARRAY(JLOOP))
|
/dports/science/dcl/dcl-5.4.8/demo/grph2/udegpk/ |
H A D | u2df09b.f | 9 PARAMETER( KMAX=5, PMIN=0, PMAX=1 ) 10 REAL U(NX,NY), V(NX,NY), P(NX,NY), PI(2,KMAX+1) 43 DP = (PMAX-PMIN)/KMAX 44 DO 20 K=1,KMAX 58 DO 30 K=1,KMAX+1 64 CALL UDCNTR( PI, 2, 2, KMAX+1 ) 65 CALL UETONB( PI, 2, 2, KMAX+1 )
|
H A D | u2df09c.f | 9 PARAMETER( KMAX=5, PMIN=0, PMAX=1 ) 10 REAL U(NX,NY), V(NX,NY), P(NX,NY), PI(2,KMAX+1) 45 DP = (PMAX-PMIN)/KMAX 46 DO 20 K=1,KMAX 60 DO 30 K=1,KMAX+1 66 CALL UDCNTR( PI, 2, 2, KMAX+1 ) 67 CALL UETONC( PI, 2, 2, KMAX+1 )
|
H A D | u2df09f.f | 9 PARAMETER( KMAX=5, PMIN=0, PMAX=1 ) 10 REAL U(NX,NY), V(NX,NY), P(NX,NY), PI(2,KMAX+1) 45 DP = (PMAX-PMIN)/KMAX 46 DO 20 K=1,KMAX 60 DO 30 K=1,KMAX+1 66 CALL UDCNTR( PI, 2, 2, KMAX+1 ) 67 CALL UETONF( PI, 2, 2, KMAX+1 )
|
H A D | u2df09e.f | 9 PARAMETER( KMAX=5, PMIN=0, PMAX=1 ) 10 REAL U(NX,NY), V(NX,NY), P(NX,NY), PI(2,KMAX+1) 43 DP = (PMAX-PMIN)/KMAX 44 DO 20 K=1,KMAX 58 DO 30 K=1,KMAX+1 64 CALL UDCNTR( PI, 2, 2, KMAX+1 ) 65 CALL UETONE( PI, 2, 2, KMAX+1 )
|
/dports/math/math77/MATH77/ |
H A D | dsval.f | 47 integer KMAX local 48 parameter(KMAX = 20) 51 double precision AJ(KMAX), BCOEF(NC) 52 double precision DP(KMAX), DM(KMAX), FKMJ, T(NC+K), X, ZERO 58 if(K .gt. KMAX) then 61 call IERV1('KMAX',KMAX,'.')
|
H A D | ssval.f | 47 integer KMAX local 48 parameter(KMAX = 20) 51 real AJ(KMAX), BCOEF(NC) 52 real DP(KMAX), DM(KMAX), FKMJ, T(NC+K), X, ZERO 58 if(K .gt. KMAX) then 61 call IERV1('KMAX',KMAX,'.')
|
H A D | dsvala.f | 27 integer KMAX local 28 parameter(KMAX=20) 31 double precision BDIF(N,NDERIV+1), DELTAL(KMAX), DELTAR(KMAX) 33 double precision T(N+K), TERM, VNIKX(KMAX), X, ZERO 38 if(K .gt. KMAX) then 41 call IERV1('KMAX',KMAX,'.')
|
H A D | ssvala.f | 27 integer KMAX local 28 parameter(KMAX=20) 31 real BDIF(N,NDERIV+1), DELTAL(KMAX), DELTAR(KMAX) 33 real T(N+K), TERM, VNIKX(KMAX), X, ZERO 38 if(K .gt. KMAX) then 41 call IERV1('KMAX',KMAX,'.')
|
H A D | dsbasd.f | 101 integer KMAX local 102 parameter(KMAX = 20) 105 double precision BDERIV(KORDER), DELTAL(KMAX), DELTAR(KMAX), FLK1 120 if(KORDER .gt. KMAX) then 123 call IERV1('KMAX',KMAX,'.')
|
H A D | ssbasd.f | 101 integer KMAX local 102 parameter(KMAX = 20) 105 real BDERIV(KORDER), DELTAL(KMAX), DELTAR(KMAX), FLK1 120 if(KORDER .gt. KMAX) then 123 call IERV1('KMAX',KMAX,'.')
|
/dports/science/dcl/dcl-5.4.8/demo/rakuraku/u2d/ |
H A D | u2d7.f | 9 PARAMETER( KMAX=5, PMIN=0, PMAX=1 ) 10 REAL U(NX,NY), V(NX,NY), P(NX,NY), PI(2,KMAX+1) 54 DP = (PMAX-PMIN)/KMAX 55 DO 20 K=1,KMAX 69 DO 30 K=1,KMAX+1 74 CALL UDCNTR( PI, 2, 2, KMAX+1 ) 75 CALL UETONE( PI, 2, 2, KMAX+1 )
|
/dports/science/dcl/dcl-5.4.8/demo/rakuraku/color/ |
H A D | color3.f | 9 PARAMETER ( KMAX=56, PMIN=0, PMAX=1 ) 10 REAL P(NX,NY), PI(2,KMAX+1) 31 DP = (PMAX-PMIN)/KMAX 32 DO 20 K=1,KMAX 48 DO 30 K=1,KMAX+1 53 CALL UETONE( PI, 2, 2, KMAX+1 )
|
/dports/math/cmlib/cmlib-3.0_8/src/fcnpak/ |
H A D | xsadj.f | 28 INTEGER L, L2, KMAX 29 COMMON /XSBLK2/ RADIX, RADIXL, RAD2L, DLG10R, L, L2, KMAX 47 10 IF (IX.LT.-KMAX+L2) GO TO 40 55 30 IF (IX.GT.KMAX-L2) GO TO 40 61 60 IF (IABS(IX).GT.KMAX) GO TO 40
|