/dports/biology/mopac/mopac7-1.15/fortran/ |
H A D | powsq.f | 39 COMMON /TIMDMP/ TLEFT, TDUMP local 68 TLAST=TLEFT 150 1 TSTEP, TLEFT 151 IF(TLAST-TLEFT.GT.TDUMP)THEN 152 TLAST=TLEFT 159 IF( TLEFT .LT. TSTEP*2.D0) THEN 202 IF(TLAST-TLEFT.GT.TDUMP)THEN 203 TLAST=TLEFT 210 IF( TLEFT .LT. TSTEP*2.D0) THEN 329 TLEFT=TLEFT-TIME2+TIME0 [all …]
|
H A D | fmat.f | 28 COMMON /TIMDMP/ TLEFT, TDUMP local 94 TLAST=TLEFT 108 IF (TSCF.GT.0.D0)TLEFT=TLEFT-TSCF-TDER 146 1'',F10.2,'' TIME LEFT:'',F10.2)')I,TOTIME,TLEFT 266 TLEFT= MAX(0.1D0,TLEFT-TSTEP) 271 1',F10.2,'' TIME LEFT:'',F10.2)')I,TOTIME,TLEFT 273 1''INTEGRAL ='',F10.2,'' TIME LEFT:'',F10.2)')I,TOTIME,TLEFT 277 1'',F10.2,'' TIME LEFT:'',F10.2)')I,TSTEP,TOTIME,TLEFT 283 IF(TLAST-TLEFT.GT.TDUMP)THEN 284 TLAST=TLEFT [all …]
|
H A D | nllsq.f | 51 COMMON /TIMDMP/ TLEFT, TDUMP local 81 TLAST=TLEFT 84 TLEFT=TLEFT-SECOND()+TIME0 283 TLEFT=TLEFT-TCYCLE 284 IF(TLEFT .GT. TCYCLE*2) GO TO 60 438 TLEFT=TLEFT-TCYCLE 440 WRITE(6,600)TLEFT,SQRT(SSQ),ESCF 446 1MIN(TLEFT,9999999.9D0),MIN(SQRT(SSQ),999999.999D0),ESCF 452 IF(TLAST-TLEFT.GT.TDUMP)THEN 453 TLAST=TLEFT [all …]
|
H A D | flepo.f | 21 COMMON /TIMDMP/ TLEFT, TDUMP local 196 TLAST=TLEFT 198 TLEFT=TLEFT-TX2+TIME0 297 TLEFT=TLEFT-TX1+TX2 740 TLEFT=TLEFT-TCYCLE 741 IF(TLEFT.LT.0)TLEFT=-0.1D0 743 IF(TLAST-TLEFT.GT.TDUMP)THEN 745 TLAST=TLEFT 752 IF(MINPRT) WRITE(6,480)MIN(TLEFT,9999999.9D0), 759 1MIN(TLEFT,9999999.9D0),MIN(GNORM,999999.999D0),FUNCT1 [all …]
|
H A D | wrtkey.f | 12 COMMON /TIMDMP/ TLEFT, TDUMP local 189 TLEFT=READA(KEYWRD,I) 203 IF(TLEFT.LT.99999.9D0)THEN 204 WRITE(6,1000)TLEFT,CHRONO 206 WRITE(6,1010)TLEFT,CHRONO 208 TLEFT=TLEFT*TIME 210 TLEFT=MAXTIM 211 WRITE(6,1000)TLEFT,'SECONDS' 213 WRITE(6,1000)TLEFT,'SECONDS'
|
H A D | ef.f | 44 COMMON /TIMDMP/ TLEFT, TDUMP local 146 TLEFT=TLEFT-TSTEP 149 IF (TLEFT .LT. TSTEP*TWO) GOTO 280 152 1MIN(TLEFT,9999999.9D0),MIN(GNFINA,999999.999D0),FUNCT 164 WRITE(6,50)MIN(TLEFT,9999999.9D0), 166 IF(LOG)WRITE(11,50)MIN(TLEFT,9999999.9D0), 422 IF (TLEFT .LT. TSTEP*TWO) THEN 1037 COMMON /TIMDMP/ TLEFT, TDUMP local 1127 TLEFT=TLEFT-TSTEP 1129 IF( TLEFT .LT. TSTEP*TWO) THEN [all …]
|
H A D | drc.f | 17 COMMON /TIMDMP/ TLEFT, TDUMP local 545 TLEFT=TLEFT-TCYCLE 546 IF (ILOOP.EQ.IUPPER.OR.TLEFT.LT.3*TCYCLE) THEN
|
/dports/astro/p5-Astro-PAL/Astro-PAL-1.09/palsrc/ |
H A D | palPertue.c | 255 double TLEFT; in palPertue() local 362 TLEFT = TSPAN; in palPertue() 384 while (FB*TLEFT > 0.0) { in palPertue() 407 TLEFT = TSPAN-RTN; in palPertue() 408 if (fabs(TS) > fabs(TLEFT)) TS=TLEFT; in palPertue() 608 TLEFT = TSPAN-RTN; in palPertue() 611 if (fabs(RTN) >= AGEBEL || FB*TLEFT <= 0.0) { in palPertue() 637 TLEFT = TSPAN; in palPertue()
|
/dports/x11-wm/wmx/wmx-8/ |
H A D | Rotated.C | 492 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 504 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 516 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 528 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 550 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString() 561 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString() 572 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString() 583 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString()
|
/dports/x11-wm/wm2/wm2-4/ |
H A D | Rotated.C | 500 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 512 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 524 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 536 if (align == TLEFT || align == TCENTRE || align == TRIGHT) in XRotDrawAlignedString() 558 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString() 569 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString() 580 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString() 591 if (align == TLEFT || align == MLEFT || align == BLEFT) in XRotDrawAlignedString()
|
/dports/audio/audacity/audacity-Audacity-3.1.3/lib-src/libnyquist/nyquist/xlisp/ |
H A D | xlstr.c | 16 #define TLEFT 1 macro 183 LVAL xtrim(void) { return (trim(TLEFT|TRIGHT)); } in xtrim() 184 LVAL xlefttrim(void) { return (trim(TLEFT)); } in xlefttrim() 203 if (fcn & TLEFT) in trim()
|
/dports/math/R/R-4.1.2/src/modules/X11/ |
H A D | rotated.c | 61 #define TLEFT 1 macro 390 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XRotPaintAlignedString() 619 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XRotDrawHorizontalString() 640 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XRotDrawHorizontalString() 963 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XRotCreateTextItem() 1470 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XRotTextExtents() 1649 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XmbRotPaintAlignedString() 1837 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XmbRotDrawHorizontalString() 1858 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XmbRotDrawHorizontalString() 2181 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XmbRotCreateTextItem() [all …]
|
/dports/math/libRmath/R-4.1.1/src/modules/X11/ |
H A D | rotated.c | 61 #define TLEFT 1 macro 390 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XRotPaintAlignedString() 619 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XRotDrawHorizontalString() 640 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XRotDrawHorizontalString() 963 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XRotCreateTextItem() 1470 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XRotTextExtents() 1649 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XmbRotPaintAlignedString() 1837 if(align==TLEFT || align==TCENTRE || align==TRIGHT) in XmbRotDrawHorizontalString() 1858 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XmbRotDrawHorizontalString() 2181 if(align==TLEFT || align==MLEFT || align==BLEFT || align==NONE) in XmbRotCreateTextItem() [all …]
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/LIN/ |
H A D | dlattr.f | 163 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 680 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 686 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 693 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/xlapack/lapack-3.10.0/TESTING/LIN/ |
H A D | dlattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 677 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/blas/lapack-3.10.0/TESTING/LIN/ |
H A D | slattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z local 677 TLEFT = BIGNUM / MAX( ONE, REAL( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
H A D | dlattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z local 677 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/lapacke/lapack-3.10.0/TESTING/LIN/ |
H A D | dlattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 677 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
H A D | slattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 677 TLEFT = BIGNUM / MAX( ONE, REAL( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/lapack/lapack-3.10.0/TESTING/LIN/ |
H A D | slattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z local 677 TLEFT = BIGNUM / MAX( ONE, REAL( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
H A D | dlattr.f | 160 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 677 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 683 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 690 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/LIN/ |
H A D | dlattr.f | 163 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z local 680 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 686 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 693 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/LIN/ |
H A D | slattr.f | 163 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z local 680 TLEFT = BIGNUM / MAX( ONE, REAL( N-1 ) ) 686 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 693 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/LIN/ |
H A D | slattr.f | 163 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 680 TLEFT = BIGNUM / MAX( ONE, REAL( N-1 ) ) 686 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 693 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|
H A D | dlattr.f | 163 $ TEXP, TLEFT, TSCAL, ULP, UNFL, X, Y, Z 680 TLEFT = BIGNUM / MAX( ONE, DBLE( N-1 ) ) 686 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J ) 693 A( I, J ) = SIGN( TLEFT, A( I, J ) ) + TSCAL*A( I, J )
|