| /dports/misc/libemos/libemos-4.5.9-Source/tools/bufrtools_wmo/ |
| H A D | bufr_simulate.F90 | 722 KTDLEN=10
868 KTDLEN=9
1010 KTDLEN=8
1191 KTDLEN=44
1332 KTDLEN=14
1508 KTDLEN=9
1665 KTDLEN=22
1835 KTDLEN=10
2005 KTDLEN=8
2167 KTDLEN=28
[all …]
|
| H A D | bufr_ntm.F | 796 KTDLEN=J
931 KTDLEN=J
1063 KTDLEN=J
1210 KTDLEN=J
1393 KTDLEN=J
1515 KTDLEN=KTDLEN+1
1567 KTDLEN=J
1710 KTDLEN=J
1827 KTDLEN=J
1963 KTDLEN=J
[all …]
|
| H A D | bufr_0t2.F | 574 KTDLEN=J
709 KTDLEN=J
841 KTDLEN=J
988 KTDLEN=J
1171 KTDLEN=J
1289 KTDLEN=KTDLEN+1
1341 KTDLEN=J
1485 KTDLEN=J
1599 KTDLEN=J
1736 KTDLEN=J
[all …]
|
| H A D | bufr_repack_206t205.F | 232 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)
380 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL, !KSUP(5),
|
| H A D | bufr_decode.F | 324 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,
513 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL1,
571 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL1,
|
| H A D | bufr_decode_all.F | 352 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,
543 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL1,
601 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL1,
|
| H A D | snow_key_repack.F | 238 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)
444 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL, !KSUP(5),
|
| H A D | bufr_repack_satid.F | 242 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)
431 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL, !KSUP(5),
|
| H A D | bufr_nt1.F | 268 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)
437 1 KTDLEN,KTDLST,KDLEN,KDATA,KEL, !KSUP(5),
|
| H A D | bufr_split.F | 201 CALL BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR)
207 DO I=1,KTDLEN
214 DO I=1,KTDLEN
|
| /dports/misc/libemos/libemos-4.5.9-Source/bufrdc_wmo/ |
| H A D | bufren.F | 12 1 KTDLEN,KTDLST,KDLEN,KDATA,KELEM,KVALS,
183 DIMENSION KTDLST(KTDLEN)
246 CALL BUENS3( KSEC3,KTDLEN,KTDLST,KBUFL,KBUFF,KERR)
264 CALL BUETD(KPT,KTDLEN,KTDLST,KDLEN,KDATA,KSEC3,
279 CALL BUETD(KPT,KTDLEN,KTDLST,KDLEN,KDATA,KSEC3,
|
| H A D | buxdes.F | 11 SUBROUTINE BUXDES(K,KSEC1,KTDLEN,KTDLST,KDLEN,KDATA,KELEM, argument
98 DIMENSION KTDLST(KTDLEN)
134 CALL BUEDD(KPT,KTDLEN,KTDLST,KDLEN,KDATA,KSEC3,
150 DO 110 I=1,KTDLEN
|
| H A D | buprs3.F | 11 SUBROUTINE BUPRS3(KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP,KELEM,CNAMES) argument
75 DIMENSION KTDLST(KTDLEN),KTDEXP(KTDEXL)
102 DO 110 I=1,KTDLEN
|
| H A D | bbuprs3.F | 11 SUBROUTINE BBUPRS3(KNT,KSEC3,KTDLEN,KTDLST,KTDEXL, argument
75 DIMENSION KTDLST(KTDLEN)
103 DO 110 I=1,KTDLEN
|
| H A D | buetd.F | 11 SUBROUTINE BUETD(KPT,KTDLEN,KTDLST,KDLEN,KDATA,KSEC3, argument
107 DIMENSION KDATA(KDLEN),KTDLST(KTDLEN)
139 JMAX = KTDLEN
142 IF(KTDLEN.GT.JELEM) THEN
|
| H A D | buedd.F | 11 SUBROUTINE BUEDD(KPT,KTDLEN,KTDLST,KDLEN,KDATA,KSEC3, argument
108 DIMENSION KDATA(KDLEN),KTDLST(KTDLEN)
137 JMAX = KTDLEN
140 IF(KTDLEN.GT.JELEM) THEN
|
| H A D | buens3.F | 11 SUBROUTINE BUENS3(KSEC3,KTDLEN,KTDLST,KBUFL,KBUFF,KERR) argument
78 DIMENSION KTDLST(KTDLEN)
163 DO 161 I=1,KTDLEN
|
| H A D | busel.F | 11 SUBROUTINE BUSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR) argument
84 KTDLEN=NTDLEN
|
| H A D | busel2.F | 11 SUBROUTINE BUSEL2(KSUBSET,KELEM,KTDLEN,KTDLST,KTDEXL,KTDEXP, argument
91 KTDLEN=NTDLEN
|
| /dports/misc/libemos/libemos-4.5.9-Source/crexdc/ |
| H A D | crexprs1.F | 11 SUBROUTINE CREXPRS1(KSEC1,KSEC3,KTDLEN,KTDLST,KTDEXL,KTDEXP, argument
119 DIMENSION KTDLST(KTDLEN),KTDEXP(KTDEXL)
173 DO 110 I=1,KTDLEN
|
| H A D | crexs1.F | 413 KTDLEN=0
430 KTDLEN=KTDLEN+1
431 CALL EXTGRPC(KBUFL,YBUFF, NBPT,6,CREXLST(KTDLEN),KERR)
441 NCREXTDLEN=KTDLEN
|
| H A D | crexdes.F | 11 SUBROUTINE CREXDES(K,KSEC1,KTDLEN,CREXKTDLST,KDLEN,KDATA,KELEM, argument
224 CALL CREXEDD(KPT,KTDLEN,CREXKTDLST,KDLEN,KDATA,KSEC3,
240 DO 110 I=1,KTDLEN
|
| H A D | crexsel.F | 11 SUBROUTINE CREXSEL(KTDLEN,KTDLST,KTDEXL,KTDEXP,KERR) argument
96 KTDLEN=NCREXTDLEN
|
| H A D | crexetd.F | 11 SUBROUTINE CREXETD(KPT,KTDLEN,CREXLST,KDLEN,KDATA,KSEC3, argument
192 NCREXTDLEN=KTDLEN
199 DO 221 JJ=1,KTDLEN
|
| H A D | crexsel2.F | 11 SUBROUTINE CREXSEL2(KSUBSET,KELEM,KTDLEN,KTDLST,KTDEXL,KTDEXP, argument
107 KTDLEN=NCREXTDLEN
|