Home
last modified time | relevance | path

Searched refs:TLEFT (Results 1 – 25 of 167) sorted by relevance

1234567

/dports/biology/mopac/mopac7-1.15/fortran/
H A Dpowsq.f39 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 Dfmat.f28 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 Dnllsq.f51 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 Dflepo.f21 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 Dwrtkey.f12 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 Def.f44 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 Ddrc.f17 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 DpalPertue.c255 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 DRotated.C492 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 DRotated.C500 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 Dxlstr.c16 #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 Drotated.c61 #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 Drotated.c61 #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 Ddlattr.f163 $ 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 Ddlattr.f160 $ 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 Dslattr.f160 $ 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 Ddlattr.f160 $ 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 Ddlattr.f160 $ 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 Dslattr.f160 $ 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 Dslattr.f160 $ 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 Ddlattr.f160 $ 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 Ddlattr.f163 $ 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 Dslattr.f163 $ 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 Dslattr.f163 $ 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 Ddlattr.f163 $ 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 )

1234567