Home
last modified time | relevance | path

Searched refs:TEMPZ (Results 1 – 13 of 13) sorted by relevance

/dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/
H A Ddp4.F22059 TEMPZ(ICNT)=TEMPZ(I)
22081 TEMPZ(ICNT)=TEMPZ(I)
27588 IF(TEMPZ(I).LT.AMNSD)AMNSD=TEMPZ(I)
27589 IF(TEMPZ(I).GT.AMXSD)AMXSD=TEMPZ(I)
28120 IF(TEMPZ(I).LT.AMNSD)AMNSD=TEMPZ(I)
28121 IF(TEMPZ(I).GT.AMXSD)AMXSD=TEMPZ(I)
29872 TEMPZ(ICNT)=TEMPZ(I)
29894 TEMPZ(ICNT)=TEMPZ(I)
34815 IF(TEMPZ(I).LT.AMNSD)AMNSD=TEMPZ(I)
34816 IF(TEMPZ(I).GT.AMXSD)AMXSD=TEMPZ(I)
[all …]
H A Ddp15.F10900 DIMENSION TEMPZ(*)
10986 IF(IXVAR.EQ.'ON')TEMPZ(K)=Z(I)
11306 DIMENSION TEMPZ(*)
11396 IF(IXVAR.EQ.'ON')TEMPZ(K)=Z(I)
11429 1 TEMP,TEMPZ,TEMPZ,XTEMP1,XTEMP2,XTEMP3,
11758 DIMENSION TEMPZ(*)
11845 IF(IXVAR.EQ.'ON')TEMPZ(K)=Z(I)
12172 DIMENSION TEMPZ(*)
12278 IF(IXVAR.EQ.'ON')TEMPZ(K)=Z(I)
12607 DIMENSION TEMPZ(*)
[all …]
H A Ddp17.F189 DIMENSION TEMPZ(MAXOBV)
1014 TEMPZ(ICNT)=Y2(L)
1411 DIMENSION TEMPZ(*)
1677 TEMPZ(K)=YZ(I)
1704 TEMPZ(K2)=YZ(I)
6948 DIMENSION TEMPZ(*)
7052 CALL CMPSTA(TEMP,TEMPZ,TEMPZ,XTEMP1,XTEMP2,XTEMP3,
15742 DIMENSION TEMPZ(*)
16197 TEMPZ(IROW)=XSD
16243 TEMPZ(IJ)=TEMPZ(IJ) + AFACT*XTEMP1(IJ)
[all …]
H A Ddp11.F22544 DIMENSION TEMPZ(*)
22722 TEMPZ(K)=Z(I)
22783 TEMPZ(I)=Z(I)
22875 DIMENSION TEMPZ(*)
23694 DIMENSION TEMPZ(*)
24144 DIMENSION TEMPZ(*)
24795 DIMENSION TEMPZ(*)
25449 DIMENSION TEMPZ(*)
26127 DIMENSION TEMPZ(*)
26837 DIMENSION TEMPZ(*)
[all …]
H A Ddp30.F7616 DIMENSION TEMPZ(*)
7671 TEMPZ(K)=0.0
7674 IF(ISTANR.GE.2)TEMPZ(K)=Z(I)
9946 DIMENSION TEMPZ(*)
10005 TEMPZ(K)=0.0
10008 IF(ISTANR.GE.2)TEMPZ(K)=Z(I)
10277 DIMENSION TEMPZ(*)
10338 TEMPZ(K)=0.0
10341 IF(ISTANR.GE.2)TEMPZ(K)=Z(I)
10531 DIMENSION TEMPZ(*)
[all …]
H A Ddp29.F728 1 TEMP,TEMPZ,TEMPZ2,XIDTEM,TAG,
839 DIMENSION TEMPZ(*)
1132 TEMPZ(K)=Z(I,NV1)
1135 TEMPZ(K)=Z(I,NV1+1)
1138 TEMPZ(K)=Z(I,NV1+1)
1170 TEMPZ(I)=Z(I,NV1)
1173 TEMPZ(I)=Z(I,NV1+1)
1176 TEMPZ(I)=Z(I,NV1+1)
1314 TEMPZ(K)=Z(I,NV1)
1317 TEMPZ(K)=Z(I,NV1+1)
[all …]
H A Ddp22.F6044 SUBROUTINE DPPOTA(Y1,YSTAT,TEMPZ,MAXNXT, argument
6107 DIMENSION TEMPZ(*)
6293 1 TEMPZ,XROW,XCOL,XTEMP1,XTEMP2,XTEMP3,
6322 1 TEMPZ,XROW,XCOL,XTEMP1,XTEMP2,XTEMP3,
6379 DIMENSION TEMPZ(*)
6537 CALL CMPSTA(Y,TEMPZ,TEMPZ,XTEMP1,XTEMP2,XTEMP3,
H A Ddp21.F1450 1 TEMP,TEMPZ,TEMPZ2,XIDTEM,YOUT,
1506 DIMENSION TEMPZ(*)
1680 TEMPZ(I)=Y2(I)
1690 TEMPZ(K)=Y2(I)
1725 CALL MOVSTA(TEMP,TEMPZ,TEMPZ2,NS2,ISTANR,ICASS7,MAXOBV,
1738 CALL CMPSTA(TEMP,TEMPZ,TEMPZ2,XTEMP1,XTEMP2,XTEMP3,MAXOBV,
1751 CALL CUMSTA(TEMP,TEMPZ,TEMPZ2,NS2,ISTANR,ICASS7,MAXOBV,
1771 CALL WINSTA(TEMP,TEMPZ,TEMPZ2,NS2,ISTANR,ICASS7,MAXOBV,
H A Ddp9.F19021 1 TAG9,DTAG9,TEMP,TEMPZ,TEMPZ2,
19095 DIMENSION TEMPZ(*)
19222 1 TEMP,TEMPZ,TEMPZ2,XTEMP1,XTEMP2,XTEMP3,MAXNXT,
H A Ddp42.F12809 1 AIINDX,TEMPX,TEMPY,TEMPD,TEMPZ,
12856 REAL TEMPZ(*)
13001 CALL SORTI(TEMPD,N1,TEMPZ,AIINDX)
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/abacus/
H A Dherqm3.F1935 TEMPZ = D0
1972 TEMPZ = TEMPZ +
2032 TEMPZ = TEMPZ +
2450 TEMPZ = D0
2482 TEMPZ = TEMPZ +
2502 TEMPZ = D0
2533 TEMPZ = TEMPZ +
2705 TEMPZ = 0.0D0
2715 TEMPZ = TEMPZ + CORD(3,K)*CHARGE(K)
3920 TEMPZ = D0
[all …]
/dports/astro/py-ephem/ephem-4.1.3/libastro/
H A Dsatmoon.c215 double TRIP,GAM,TEMPX,TEMPY,TEMPZ; in bruton_saturn() local
359 TEMPZ = -1 * SMA[8] * COS(U[8]) / RS; in bruton_saturn()
362 Z[8] = TEMPZ * COS(GAM) + TEMPY * SIN(GAM); in bruton_saturn()
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/srdft/
H A Dsrdft.F2648 TEMPZ = D0
2654 TEMPZ = TEMPZ + DVKX*V2C_SR(L,IX)
2657 EVEC(KZCONF+IG) = EVEC(KZCONF+IG) + TEMPZ
2664 TEMPZ = D0
2670 TEMPZ = TEMPZ + DVXL*V2C_SR(IX,K)
2673 EVEC(KZCONF+IG) = EVEC(KZCONF+IG) - TEMPZ