/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/abacus/ |
H A D | abalnr.F | 445 PARAMETER (DP5=0.5D0) 1020 POLDL(1,IDIP,1,IFRVAL) = -DP5*SNDPRP(1) 1021 POLDL(2,IDIP,1,IFRVAL) = -DP5*SNDPRP(2) 1712 PARAMETER (DP5=0.5D0) 1925 PARAMETER ( D0 = 0.0D0 , DP5 = 0.5D0 , D3 = 3.0D0 ) 1932 & DP5*(D3*ALFA(I,J)*GM(I,J)-ALFA(I,I)*GM(J,J)) 1945 PARAMETER ( D0 = 0.0D0 , DP5 = 0.5D0 , D3 = 3.0D0 ) 1951 BETAAL = BETAAL + DP5*(D3*ALFA(I,J)*ALFA(I,J) 1977 BETAA = BETAA + DP5*OMEGA*ALFA(I,J)*EPSILO(I,K,L)* 2159 PARAMETER ( D0 = 0.0D0, DP5 = 0.5D0 ) [all …]
|
H A D | her1car.F | 609 PARAMETER (D0 = 0.0 D00, DP5 = 0.5 D00) 615 TFAC = -DP5*SFAC 788 PARAMETER (DP5 = 0.5 D00) 1016 PARAMETER (D2 = 2.0D0, DP5 = 0.50D0) 1049 & + D2*CORPX*DX0 - (CORPX*CORPX - DP5*EXPPI)*SX0 1051 & + D2*CORPY*DY0 - (CORPY*CORPY - DP5*EXPPI)*SY0 1053 & + D2*CORPZ*DZ0 - (CORPZ*CORPZ - DP5*EXPPI)*SZ0 1055 & + D2*CORPX*DX1 - (CORPX*CORPX - DP5*EXPPI)*SX1 1149 AFAC = (DP5*(LVALA + MVALA + NVALA) + DP75)*AINV 1150 BFAC = (DP5*(LVALB + MVALB + NVALB) + DP75)*BINV [all …]
|
H A D | abafmm.F | 665 PARAMETER (DP5 = 0.50D00, DP25 = 0.25D0) 677 IF (P.EQ.Q) DINT = DP5*DINT 678 IF (R.EQ.S) DINT = DP5*DINT 679 IF (P.EQ.R .AND. S.EQ.Q) DINT = DP5*DINT 714 PARAMETER (D0 = 0.0D0, DP5 = 0.5D0) 796 ERG0 = DP5*ERG0 797 ERG1 = DP5*ERGP + DP5*ERGQ
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/eri/ |
H A D | eri2ave.F | 53 PARAMETER (D1=1.0D0, DP5=0.5D0) 155 IF (DIAGPQ) FAC = DP5*FAC 193 PARAMETER (D4=4.0D0, D2=2.0D0, D1=1.0D0, DP5=0.5D0, DP25=0.25D0) 215 IF (DCD .OR. KC.EQ.KD) PMAT = DP5*PMAT 220 IF (DAB .OR. KA .EQ. KB) PMAT = DP5*PMAT 221 IF (DCD .OR. KC .EQ. KD) PMAT = DP5*PMAT
|
H A D | eri2fck.F | 323 PARAMETER (D1 = 1.0D0, DP5=0.50D0) 428 IF (AEQB) FAC = DP5*FAC 429 IF (CEQD) FAC = DP5*FAC 498 IF (AEQB) FAC = DP5*FAC 499 IF (CEQD) FAC = DP5*FAC 500 IF (PEQQ) FAC = DP5*FAC 545 PARAMETER (D4 = 4.0D0, D1 = 1.0D0, DP5 = 0.5D0)
|
H A D | eri2her.F | 60 PARAMETER (D0 = 0.D0, D1 = 1.D0, DP5 = -0.5D0) 97 WVALU(NODS) = DP5*ALPHA(I) 164 PARAMETER (D0 = 0.D0, D1 = 1.D0, DP5 = -0.5D0, DP25 = 0.25D0) 199 WVALU(NODS) = DP5*ALPHA(I) 265 PARAMETER (D0 = 0.D0, D1 = 1.D0, DP5 = -0.5D0, DP25 = 0.25D0) 300 WVALU(NODS) = DP5*ALPHA(I)
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/srdft/ |
H A D | dftfun_srdft.F | 282 ALPHA = DP5*RHOGRD*XL 305 XK = DP5*RHOGRD 353 GRHO = DP5*RHOGRD 354 RHO = DP5*RHOINP 417 RHOA = DP5*RHO 418 AMASQ = DP5*DP5*AMOSQ 970 RHOA = DP5*RHO 1444 C2D = DP5*PI*RHO2*(G0-DP5) 1648 & * erf(DP5/A) 1663 & (EXP(-DP25/B2)-D1)+DP5*erf(DP5/B)) [all …]
|
H A D | dftaux_srdft.F | 48 real*8, parameter :: DP5 = 0.5d0 471 PARAMETER (D0 = 0.0D0, D1 = 1.0D0, DP5 = 0.5D0) 519 FRRVWN = DP5*FRRVWN 605 FRRVWN = DP5*FRRVWN 609 RHOA = DP5*RHO 610 RHGA = (DP5*RHOGRD)**2 619 FZ0LYP = DP5*(DF0010 + DF00001)*RHOGRD 620 FRRLYP = DP5*(DF2000 + DF1100) 624 FZ0LYP = DP5*(DF0010 - DF00001)*RHOGRD 625 FRRLYP = DP5*(DF2000 - DF1100) [all …]
|
H A D | srdft.F | 1592 PARAMETER (D0 = 0.0D0, DP5 = 0.5D0) 1930 RHOA = DP5*RHO 1931 RHGA = (DP5*RHOGRD)**2 1937 FZ0LYP = DP5*(DF0010 + DF00001)*RHOGRD 1938 FRRLYP = DP5*(DF2000 + DF1100) 1939 FRZLYP = DP5*(DF1010 + DF1001+DF10001)*RHOGRD 1967 RHOA = DP5*RHO 1968 RHGA = (DP5*RHOGRD)**2 1981 FZ0LYP = DP5*(DF0010 + DF00001)*RHOGRD 1982 FRRLYP = DP5*(DF2000 + DF1100) [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/ |
H A D | cc_smcal.F | 60 REAL ZERO, FACTOR, FREQEX, FREQB, EIGV, DP5 66 DOUBLE PRECISION ZERO, FACTOR, FREQEX, FREQB, EIGV, DP5 72 PARAMETER ( ZERO = 0.0D00, FACTOR = 0.5D00, DP5 = 0.5D00) 341 TSM = DP5*(ABLM*CDRM+CDLM*ABRM) 416 REAL D2, DP5, BSMFRSV 418 DOUBLE PRECISION D2, DP5, BSMFRSV 420 PARAMETER ( D2 = 2.0D00, DP5 = 0.5D00 ) 573 BSMFR(IOFF+I) = EIGVAL(ISYOFE(ISYM)+ISTATE)* DP5
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/dft/ |
H A D | dft_old.F | 698 PARAMETER (D0 = 0.0D0, D1 = 1.0D0, DP5 = 0.5D0) 1053 G01 = DP5*G01*Z0 1058 V2P = DP5*Z0*V2P 1061 V2M = DP5*Z0*V2M 1068 V2P = DP5*ZP*V2P 1071 V2M = DP5*ZM*V2M 1085 G01 = DP5*G01*Z0 1090 V2P = DP5*Z0*V2P 1093 V2M = DP5*Z0*V2M 1100 V2P = DP5*ZP*V2P [all …]
|
H A D | dft_mag.F | 27 PARAMETER (D1 = 1.0D0, DP5 = 0.5D0) 70 AVERAG = DP5*(WORK(IJADR) - WORK(JIADR)) 452 PARAMETER (D0 = 0.0D0, DP25 = 0.25D0, DP5 = 0.5D0, D2 = 2.0D0) 488 DENS(1) = DP5*RHOA(I) 489 DENS(2) = DP5*RHOA(I) 490 DENS(3) = DP5*GRDNRM 491 DENS(4) = DP5*GRDNRM 495 VXB(I) = DP5*(VX(2)/GRDNRM + VX(9)) 499 DENS(1) = DP5*RHOA(I) 500 DENS(2) = DP5*RHOA(I)
|
H A D | dft_hes.F | 310 & + DP5*VXCZZ(K)*ZETDER(K,I)*ZETDER(K,J) 665 PARAMETER (D0 = 0.0D0, D2 = 2.0D0, DP5 = 0.5D0) 831 PARAMETER (DP5 = 0.5D0) 1177 PARAMETER (DP5 = 0.5D0, D1 = 1.0D0) 1193 DENS(1) = DP5*RHOA(I) 1194 DENS(2) = DP5*RHOA(I) 1195 DENS(3) = DP5*GRDNRM 1196 DENS(4) = DP5*GRDNRM 1205 & + DP5*VX(8) + GDNRMI* VX(7) 1209 DENS(1) = DP5*RHOA(I) [all …]
|
H A D | dft_den.F | 64 PARAMETER (DP5 = 0.50D0, D1 = 1.0D0) 85 IF (I.NE.J) FAC = DP5 334 PARAMETER ( D1 = 1.0D0, DP5 =0.5D0) 369 CALL DSCAL(N2BASX,DP5,DMATB,1)
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/soppa/ |
H A D | so_polar.F | 44 PARAMETER (DP5=0.5D0) 200 POLDL(1,IDIP,IDX,IFRVAL) = -DP5*SNDPRP(1) 204 POLDA(1,IDIP,IDX,IFRVAL) = -DP5*SNDPRP(1)
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/gp/ |
H A D | gpjkp.F | 28 PARAMETER (D0 = 0.0D0, DP5 = 0.5D0) 31 ERF = -GAMMP2(DP5,X**2) 33 ERF = GAMMP2(DP5,X**2)
|
H A D | gphjj.F | 518 PARAMETER(DP5 = 0.5D0, D1P5 = 1.5D0, D1P375 = 1.375D0, 601 CX=D1 - DP5*T2X25 604 CX=D1+T2X25*(T2X25*D1P375 - DP5 ) 608 CX= SQRT(DP5 + T) 609 SX= SIGN( SQRT(DP5 - T),T2X2) 740 PARAMETER(DP5 = 0.5D0, D1P5 = 1.5D0, D1P375 = 1.375D0, 816 CX = D1 - DP5*T2X25 820 CX = D1 + T2X25*(T2X25*D1P375 - DP5 ) 824 CX = SQRT(DP5 + T) 825 SX = SIGN( SQRT(DP5 - T),T2X2 )
|
/dports/games/libretro-mame2003_plus/mame2003-plus-libretro-17e9889/src/cpu/spc700/ |
H A D | spc700ds.c | 37 N13 , N14 , N15 , DP0 , DP1 , DP2 , DP3 , DP4 , DP5 , DP6 , DP7 , MEMN, enumerator 233 /* A2 */ {SET1 , {DP5 , IMP }}, 234 /* A3 */ {BBS , {DP5 , REL }}, 249 /* B2 */ {CLR1 , {DP5 , IMP }}, 250 /* B3 */ {BBC , {DP5 , REL }}, 412 case DP5: sprintf(ptr, "$%02x.5", read_8_immediate()); break; in spc700_disassemble()
|
/dports/games/libretro-mame2003/mame2003-libretro-4358db4/src/cpu/spc700/ |
H A D | spc700ds.c | 37 N13 , N14 , N15 , DP0 , DP1 , DP2 , DP3 , DP4 , DP5 , DP6 , DP7 , MEMN, enumerator 233 /* A2 */ {SET1 , {DP5 , IMP }}, 234 /* A3 */ {BBS , {DP5 , REL }}, 249 /* B2 */ {CLR1 , {DP5 , IMP }}, 250 /* B3 */ {BBC , {DP5 , REL }}, 412 case DP5: sprintf(ptr, "$%02x.5", read_8_immediate()); break; in spc700_disassemble()
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/sirius/ |
H A D | sirsolpcm.F | 43 PARAMETER ( D0 = 0.0D0, DP5 = 0.5D0, D1 = 1.0D0, D2 = 2.0D0, 425 ESOLT = - DP5 * TJEN + DP5 * PCMNE + PCMNN 522 PARAMETER ( D0 = 0.0D0, D1 = 1.0D0, D2 = 2.0D0, DP5 = 0.5D0) 748 ESOLT = DP5 * (PCMEN + PCMNE + PCMEE + PCMNN) + 749 * DP5 * (PCMMM + PCMMN + PCMNM) + 750 * DP5 * (PCMEM + PCMME) 1113 PARAMETER ( D0 = 0.0D0 , D2 = 2.0D0, DP5 = 0.5D0 ) 1428 PARAMETER ( D0 = 0.0D0, DP5 = 0.5D0, D1 = 1.0D0, D2 = 2.0D0, 1492 PORT = (VTOT0QS+UELOR0)*DP5*FACSLO 1493 QSSLW = (UELOR+VTOTQS) *DP5*FACSLO
|
H A D | sirorb.F | 43 PARAMETER ( D0=0.0D0, D1=1.0D0, DP5=0.5D0 ) 190 DEPRED = DP5*EVAL*(XKAPN2 + D1/(DAMP*DAMP)) 389 PARAMETER (DP1=0.1D0, DP5=0.5D0, D1=1.0D0, D2=2.0D0) 468 DEPRED = DP5*EVAL*FAC*FAC*( (D2/FAC-D1)/(DAMP*DAMP) + OSTP0*OSTP0)
|
/dports/math/vtk8/VTK-8.2.0/Interaction/Widgets/ |
H A D | vtkRectilinearWipeRepresentation.cxx | 117 vtkInteractorObserver::ComputeWorldToDisplay(this->Renderer, p5[0],p5[1],p5[2], this->DP5); in ComputeInteractionState() 126 xyz[2] = this->DP4[2] = this->DP5[2] = this->DP6[2] = this->DP7[2] = this->DP8[2] = 0.0; in ComputeInteractionState() 140 vtkLine::DistanceToLine(xyz,this->DP8,this->DP5,t,closest) <= tol ) in ComputeInteractionState() 189 v75[i] = this->DP5[i] - this->DP7[i]; in WidgetInteraction()
|
/dports/math/vtk9/VTK-9.1.0/Interaction/Widgets/ |
H A D | vtkRectilinearWipeRepresentation.cxx | 115 vtkInteractorObserver::ComputeWorldToDisplay(this->Renderer, p5[0], p5[1], p5[2], this->DP5); in ComputeInteractionState() 124 xyz[2] = this->DP4[2] = this->DP5[2] = this->DP6[2] = this->DP7[2] = this->DP8[2] = 0.0; in ComputeInteractionState() 137 vtkLine::DistanceToLine(xyz, this->DP8, this->DP5, t, closest) <= tol) in ComputeInteractionState() 185 v75[i] = this->DP5[i] - this->DP7[i]; in WidgetInteraction()
|
/dports/math/vtk6/VTK-6.2.0/Interaction/Widgets/ |
H A D | vtkRectilinearWipeRepresentation.cxx | 117 vtkInteractorObserver::ComputeWorldToDisplay(this->Renderer, p5[0],p5[1],p5[2], this->DP5); in ComputeInteractionState() 126 xyz[2] = this->DP4[2] = this->DP5[2] = this->DP6[2] = this->DP7[2] = this->DP8[2] = 0.0; in ComputeInteractionState() 140 vtkLine::DistanceToLine(xyz,this->DP8,this->DP5,t,closest) <= tol ) in ComputeInteractionState() 189 v75[i] = this->DP5[i] - this->DP7[i]; in WidgetInteraction()
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/pdpack/ |
H A D | linextra.F | 161 PARAMETER ( DP5 = 0.5D0 ) 166 AAP(JOFF+I) = DP5 * (AGE(J,I) - AGE(I,J)) 183 PARAMETER ( DP5 = 0.5D0 ) 191 ASP(JOFF+I) = DP5 * (AGE(I,J) + AGE(J,I)) 236 PARAMETER ( DP5 = 0.5D0 ) 241 ASP(JOFF+I) = ASP(JOFF+I) + DP5 * (AGE(I,J) + AGE(J,I)) 257 PARAMETER ( DP5 = 0.5D0) 262 X = ASP(JOFF+I)*DP5 326 PARAMETER ( DP5 = 0.5D0 ) 331 ASI(J,I) = DP5 * (AGE(I,J) + AGE(J,I))
|