/dports/misc/libemos/libemos-4.5.9-Source/tools/bufr_exports/synop2bufr/ |
H A D | synop2bufr.f | 1779 K=KDEC(17)*1000 + KDEC(16) 1824 CALL IC3845(KINT(23),KINT(22),KDEC(16),KDEC(17),MINDIC,KDEC(31)) 1833 CALL IC3845(KINT(26),KINT(25),KDEC(16),KDEC(17),MINDIC,KDEC(32)) 1935 IF (KDEC(38).GE.5.AND.KDEC(38).LE.8) KDEC(39) = -KDEC(39) 1973 CALL ICTRTR (KDEC(16),KDEC(17),KINT(37),IHOURS,MINDIC,KDEC(41)) 2152 IF(KDEC(63) .NE. MINDIC) KDEC(63)= (KDEC(63) + 5) / 10 2214 IF(KDEC(70) .GT. 500) KDEC(70)=500-KDEC(70) 2255 IF(KDEC(17) .EQ. 1 .OR. KDEC(17) .EQ. 2 .OR. KDEC(17) .EQ. 6) 2640 KDEC(15) = IAND(KDEC(15),4) 5685 IF ( KDEC(8).GT.9999 ) KDEC(8) = KDEC(8)-16383 [all …]
|
H A D | comwork.h | 5 COMMON / COMWORK / KCHAR(jp15),KINT(jp15),KDEC(jp11),
|
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | zsol_driver.F | 3109 C_RW2(I)=id%RHS(I-1+KDEC) 3151 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3160 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3169 KDEC=int(id%IRHS_PTR(JBEG_RHS),8) 3439 id%RHSCOMP(KDEC+1_8:KDEC+NBENT_RHSCOMP) = ZERO 3580 id%RHSCOMP(KDEC+1_8:KDEC+int(LD_RHSCOMP,8))=ZERO 3761 KDEC = IBEG_REDRHS 3910 KDEC = IBEG_REDRHS 3911 CALL MPI_RECV(id%REDRHS(KDEC), 4874 KDEC = (K-1)*LD_RHS+IBEG-1 [all …]
|
H A D | csol_driver.F | 3109 C_RW2(I)=id%RHS(I-1+KDEC) 3151 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3160 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3169 KDEC=int(id%IRHS_PTR(JBEG_RHS),8) 3439 id%RHSCOMP(KDEC+1_8:KDEC+NBENT_RHSCOMP) = ZERO 3580 id%RHSCOMP(KDEC+1_8:KDEC+int(LD_RHSCOMP,8))=ZERO 3761 KDEC = IBEG_REDRHS 3910 KDEC = IBEG_REDRHS 3911 CALL MPI_RECV(id%REDRHS(KDEC), 4874 KDEC = (K-1)*LD_RHS+IBEG-1 [all …]
|
H A D | dsol_driver.F | 3109 C_RW2(I)=id%RHS(I-1+KDEC) 3151 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3160 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3169 KDEC=int(id%IRHS_PTR(JBEG_RHS),8) 3439 id%RHSCOMP(KDEC+1_8:KDEC+NBENT_RHSCOMP) = ZERO 3580 id%RHSCOMP(KDEC+1_8:KDEC+int(LD_RHSCOMP,8))=ZERO 3761 KDEC = IBEG_REDRHS 3910 KDEC = IBEG_REDRHS 3911 CALL MPI_RECV(id%REDRHS(KDEC), 4874 KDEC = (K-1)*LD_RHS+IBEG-1 [all …]
|
H A D | ssol_driver.F | 3109 C_RW2(I)=id%RHS(I-1+KDEC) 3151 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3160 id%RHS(KDEC+I) = id%RHS(KDEC+I) * 3169 KDEC=int(id%IRHS_PTR(JBEG_RHS),8) 3439 id%RHSCOMP(KDEC+1_8:KDEC+NBENT_RHSCOMP) = ZERO 3580 id%RHSCOMP(KDEC+1_8:KDEC+int(LD_RHSCOMP,8))=ZERO 3761 KDEC = IBEG_REDRHS 3910 KDEC = IBEG_REDRHS 3911 CALL MPI_RECV(id%REDRHS(KDEC), 4874 KDEC = (K-1)*LD_RHS+IBEG-1 [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | zmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | cmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | smumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | dmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | cmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | dmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | zmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | smumps_part8.F | 157 & IBEG, LD_RHS, KDEC, 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | zmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, local 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | smumps_part8.F | 157 & IBEG, LD_RHS, KDEC, local 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | cmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, local 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
H A D | dmumps_part8.F | 157 & IBEG, LD_RHS, KDEC, local 1653 KDEC = IBEG+(K-1)*LD_RHS 1666 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1674 RHS_MUMPS(KDEC+I) = RHS_MUMPS(KDEC+I) * 1680 KDEC=id%IRHS_PTR(JBEG_RHS) 1900 RHS_MUMPS(KDEC+1:KDEC+id%N) = ZERO 1981 KDEC = (K-1) *LD_RHSCOMP 1982 id%RHSCOMP(KDEC+1:KDEC+LD_RHSCOMP)=ZERO 2065 KDEC = IBEG_REDRHS 2191 KDEC = IBEG_REDRHS [all …]
|
/dports/games/flightgear-data/fgdata/ATC/ |
H A D | default.atis | 1036 I 39.8346 -88.8657 682 126.35 50 KDEC "Decatur"
|
H A D | default.tower | 3039 T 39.8346 -88.8657 682 118.9 50 KDEC "Decatur" 3040 T 39.8346 -88.8657 682 392.1 50 KDEC "Decatur"
|
/dports/sysutils/dateutils/dateutils-0.4.1/lib/ |
H A D | icao.tzmap | 3290 KDEC America/Chicago
|
/dports/comms/gpredict/gpredict-2.2.1/data/ |
H A D | locations.dat | 3896 United States;Illinois;Decatur;KDEC;39.8333;-88.8656;207
|
/dports/science/eccodes/eccodes-2.23.0-Source/definitions/metar/ |
H A D | x | 5817 KDEC|N39500443|W088515648|2237
|
/dports/science/eccodes/eccodes-2.23.0-Source/definitions/taf/ |
H A D | x | 5817 KDEC|N39500443|W088515648|2237
|
/dports/devel/yajl-tcl/yajl-tcl-1.7.0/playpen/ |
H A D | airports.tcl | 16940 set ::airport(KDEC) {39.8345625 -88.8656892}
|