/dports/comms/wsjtz/wsjtx/lib/ |
H A D | sync9w.f90 | 4 real ss(184,NSMAX) 6 real ccfred(NSMAX) 8 real sa(NSMAX),sb(NSMAX) 13 sa=ss(j,1:NSMAX) 14 call smo(sa,NSMAX,sb,nadd) 15 call smo(sb,NSMAX,sa,nadd) 16 ss(j,1:NSMAX)=sa
|
H A D | sync9.f90 | 4 real ss(184,NSMAX) 6 real ccfred(NSMAX) 7 real savg(NSMAX) 8 real savg2(NSMAX) 10 real sq(NSMAX) 11 real red2(NSMAX) 77 if(i+j.ge.1 .and. i+j.lt.NSMAX) sm=sm + smo(j)*savg(i+j)
|
H A D | jt9_decode.f90 | 33 real ss(184,NSMAX) 36 real*4 ccfred(NSMAX) 37 real*4 red2(NSMAX) 38 logical ccfok(NSMAX) 39 logical done(NSMAX) 68 ib=min(NSMAX,nint((nfb-nf0)/df3)) 108 ib=min(NSMAX,nint((nfb1-nf0)/df3)) 117 ib=min(NSMAX,nint((nfb1-nf0)/df3)) 158 ibb=min(NSMAX,i+22)
|
H A D | jt9w.f90 | 3 parameter (NSMAX=6827,NZMAX=60*12000) 4 real ss(184,NSMAX) 5 real ref(NSMAX) 14 do i=1,NSMAX
|
H A D | decode9w.f90 | 5 parameter (NSMAX=6827,NZMAX=60*12000) 6 real ss(184,NSMAX) !Symbol spectra at 1/2-symbol steps 7 real ccfred(NSMAX) !Best sync vs frequency 21 ib=min(NSMAX,nint((nfqso+ntol)/df)) !End frequency bin
|
H A D | flat2.f90 | 3 parameter (NSMAX=6827) 4 real s(NSMAX) 5 real ref(NSMAX)
|
H A D | symspec.f90 | 26 real*4 s(NSMAX) 27 real*4 ssum(NSMAX) 29 real*4 tmp(NSMAX) 34 common/spectra/syellow(NSMAX),ref(0:3456),filter(0:3456) 96 iz=min(NSMAX,nint(5000.0/df3))
|
H A D | xcor.f90 | 11 parameter (NSMAX=552) !Max number of quarter-symbol steps 12 real ss(NSMAX,NHMAX) !2d spectrum, stepped by half-symbols 13 real a(NSMAX)
|
/dports/comms/wsjtz/wsjtx/ |
H A D | commons.h | 4 #define NSMAX 6827 macro 20 float ss[184*NSMAX]; 21 float savg[NSMAX]; 75 float syellow[NSMAX];
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
H A D | shseqr.f | 122 INTEGER NSMAX, LDS local 123 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 132 REAL S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 231 NS = MIN( NS, MAXB, NSMAX )
|
H A D | dhseqr.f | 122 INTEGER NSMAX, LDS 123 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 132 DOUBLE PRECISION S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 231 NS = MIN( NS, MAXB, NSMAX )
|
H A D | chseqr.f | 113 INTEGER NSMAX, LDS local 114 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 125 COMPLEX S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 257 NS = MIN( NS, MAXB, NSMAX )
|
H A D | zhseqr.f | 113 INTEGER NSMAX, LDS local 114 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 125 COMPLEX*16 S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 257 NS = MIN( NS, MAXB, NSMAX )
|
/dports/math/algae/algae-4.3.6/lapack/ |
H A D | dhseqr.f | 122 INTEGER NSMAX, LDS 123 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 132 DOUBLE PRECISION S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 231 NS = MIN( NS, MAXB, NSMAX )
|
H A D | zhseqr.f | 113 INTEGER NSMAX, LDS 114 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 125 COMPLEX*16 S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 257 NS = MIN( NS, MAXB, NSMAX )
|
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
H A D | shseqr.f | 122 INTEGER NSMAX, LDS 123 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 132 REAL S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 231 NS = MIN( NS, MAXB, NSMAX )
|
H A D | dhseqr.f | 122 INTEGER NSMAX, LDS 123 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 132 DOUBLE PRECISION S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 231 NS = MIN( NS, MAXB, NSMAX )
|
H A D | chseqr.f | 113 INTEGER NSMAX, LDS 114 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 125 COMPLEX S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 257 NS = MIN( NS, MAXB, NSMAX )
|
H A D | zhseqr.f | 113 INTEGER NSMAX, LDS 114 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 125 COMPLEX*16 S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 257 NS = MIN( NS, MAXB, NSMAX )
|
/dports/science/eccodes/eccodes-2.23.0-Source/tests/ |
H A D | grib_lam_bf.c | 644 #define NSMAX 31 macro 704 trunc[1].len = 4 * (NSMAX + 1) * (NMSMAX + 1); in main() 707 rectfromellipse(trunc[1].values, trunc[0].values, NSMAX, NMSMAX); in main() 712 trunc[2].subnsmax = NSMAX; in main() 726 GRIB_CHECK(grib_set_long(h, "biFourierResolutionParameterN", NSMAX), 0); in main() 837 NSMAX != nsmax || NMSMAX != nmsmax) { in main()
|
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/complex16/ |
H A D | zhseqr.f | 113 INTEGER NSMAX, LDS 114 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 125 COMPLEX*16 S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 257 NS = MIN( NS, MAXB, NSMAX )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/lapack-timing/EIG/EIGSRC/ |
H A D | dhseqr.f | 129 INTEGER NSMAX, LDS 130 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 140 DOUBLE PRECISION S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 243 NS = MIN( NS, MAXB, NSMAX )
|
H A D | shseqr.f | 129 INTEGER NSMAX, LDS 130 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 140 REAL S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 243 NS = MIN( NS, MAXB, NSMAX )
|
/dports/math/openblas/TIMING/EIG/EIGSRC/ |
H A D | shseqr.f | 129 INTEGER NSMAX, LDS 130 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 140 REAL S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 243 NS = MIN( NS, MAXB, NSMAX )
|
H A D | dhseqr.f | 129 INTEGER NSMAX, LDS 130 PARAMETER ( NSMAX = 15, LDS = NSMAX ) 140 DOUBLE PRECISION S( LDS, NSMAX ), V( NSMAX+1 ), VV( NSMAX+1 ) 243 NS = MIN( NS, MAXB, NSMAX )
|