Home
last modified time | relevance | path

Searched refs:KTDEXL (Results 1 – 25 of 31) sorted by relevance

12

/dports/misc/libemos/libemos-4.5.9-Source/tools/bufrtools_wmo/
H A Dbufr_ntm.F802 DO 102 I=1,KTDEXL
833 DO 106 I=1,KTDEXL
937 DO 902 I=1,KTDEXL
968 DO 906 I=1,KTDEXL
1070 DO 202 I=1,KTDEXL
1101 DO 206 I=1,KTDEXL
1216 DO 702 I=1,KTDEXL
1248 DO 706 I=1,KTDEXL
2716 DO I=1,KTDEXL
2732 DO I=IDPL,KTDEXL
[all …]
H A Dbufr_0t2.F580 DO 102 I=1,KTDEXL
611 DO 106 I=1,KTDEXL
715 DO 902 I=1,KTDEXL
746 DO 906 I=1,KTDEXL
848 DO 202 I=1,KTDEXL
879 DO 206 I=1,KTDEXL
994 DO 702 I=1,KTDEXL
1026 DO 706 I=1,KTDEXL
1177 DO 302 I=1,KTDEXL
1208 DO 306 I=1,KTDEXL
[all …]
H A Dbufr_repack_206t205.F232 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
275 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
281 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
326 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_decode.F324 CALL BUSEL2(ISUBSET,KEL,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
385 CALL BUSEL2(ISUBSET,KEL,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
392 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
459 CALL BUSEL2(J,KEL,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
463 DO I=1,KTDEXL
H A Dbufr_decode_all.F352 CALL BUSEL2(ISUBSET,KEL,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
413 CALL BUSEL2(ISUBSET,KEL,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
420 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
489 CALL BUSEL2(J,KEL,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
493 DO I=1,KTDEXL
H A Dbufr_compress.F282 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
291 NCOM=JWORK/KTDEXL
295 IF(NCOM*KTDEXL.GT.JWORK) THEN
297 PRINT*,'MAXIMUM NUMBER OF SUBSETS TO BE PACKED =',JWORK/KTDEXL
H A Dsnow_key_repack.F238 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
281 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
287 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
332 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_repack_satid.F242 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
285 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
291 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
336 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_nt1.F268 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
311 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
317 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
362 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_repack.F241 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
284 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
290 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
335 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_ship_anmh.F277 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
320 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
326 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
371 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_88t89.F246 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
289 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
295 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
340 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
H A Dbufr_add_bias.F90304 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
347 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
353 CALL BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KEL,CNAMES)
398 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
/dports/misc/libemos/libemos-4.5.9-Source/bufrdc_wmo/
H A Dbuxdes.F12 2 KTDEXL,KTDEXP,CNAMES,CUNITS,KERR)
139 KTDEXL =M
140 DO 301 I=1,KTDEXL
161 DO 120 I=1,KTDEXL
H A Dbuprs3.F11 SUBROUTINE BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KELEM,CNAMES) argument
75 DIMENSION KTDLST(KTDLEN),KTDEXP(KTDEXL)
109 DO 120 I=1,KTDEXL
H A Dbbuprs3.F11 SUBROUTINE BBUPRS3(KNT,KSEC3,KTDLEN,KTDLST,KTDEXL, argument
76 DIMENSION KTDEXP(KTDEXL)
110 DO 120 I=1,KTDEXL
H A Dbusel2.F11 SUBROUTINE BUSEL2(KSUBSET,KELEM,KTDLEN,KTDLST,KTDEXL,KTDEXP, argument
99 KTDEXL=NTDEXL
103 KTDEXL=NTDEXL
H A Dbuget_opera_image.F11 SUBROUTINE BUGET_OPERA_IMAGE(KSEC1,KTDEXL,KTDEXP, argument
119 DO I=1,KTDEXL
127 DO I=1,KTDEXL
141 DO I=1,KTDEXL
176 DO I=IMAGE_START,KTDEXL
H A Dbusel.F11 SUBROUTINE BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR) argument
85 KTDEXL=NTDEXL
H A Dbuprt.F193 CALL BUSEL2(JB,KELEM,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
199 DO 104 JA=1,KTDEXL
265 CALL BUSEL2(JB,KELEM,KTDLEN,KTDLST,KTDEXL,KTDEXP,CNAMES,
272 DO 160 JA=1,KTDEXL
H A Dmbufr_mars_filter.F172 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
185 DO I=1,KTDEXL
/dports/misc/libemos/libemos-4.5.9-Source/crexdc/
H A Dcrexdes.F12 1 KTDEXL,CREXKTDEXP,CNAMES,CUNITS,KERR)
228 KTDEXL =M
229 DO 301 I=1,KTDEXL
255 DO 120 I=1,KTDEXL
H A Dcrexprs1.F11 SUBROUTINE CREXPRS1(KSEC1,KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP, argument
119 DIMENSION KTDLST(KTDLEN),KTDEXP(KTDEXL)
185 DO 120 I=1,KTDEXL
H A Dcrexsel2.F11 SUBROUTINE CREXSEL2(KSUBSET,KELEM,KTDLEN,KTDLST,KTDEXL,KTDEXP, argument
114 KTDEXL=NTDEXL
117 DO 102 I=1,KTDEXL
H A Dcrexsel.F11 SUBROUTINE CREXSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR) argument
97 KTDEXL=NCREXTDEXL

12