simgear/metar/Drvmetar.c

   1 #include "Metar.h"
   2
   3 /********************************************************************/
   4 /*                                                                  */
   5 /*  Title:         dRVMETAR                                         */
   6 /*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
   7 /*  Date:          28 Oct 1994                                      */
   8 /*  Programmer:    CARL MCCALLA                                     */
   9 /*  Language:      C/370                                            */
  10 /*                                                                  */
  11 /*  Abstract:      DRVMETAR is a main routine that acts a driver    */
  12 /*                 for testing the METAR Decoder function.          */
  13 /*                                                                  */
  14 /*  External Functions Called:                                      */
  15 /*                 None.                                            */
  16 /*                 DcdMETAR                                         */
  17 /*                 prtDcdMetar                                      */
  18 /*                 Sec0MTSm                                         */
  19 /*                 Sec1MTSm                                         */
  20 /*                                                                  */
  21 /*  Input:         None                                             */
  22 /*                                                                  */
  23 /*  Output:        None                                             */
  24 /*                                                                  */
  25 /*  Modification History:                                           */
  26 /*                 None.                                            */
  27 /*                                                                  */
  28 /********************************************************************/
  29 int main()
  30 {
  31    static char *string[] =
  32   {
  33   "KAST 221156Z COR 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
  34   "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
  35
  36   "KAST COR 221156Z 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
  37   "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
  38
  39   "KAST COR 221156Z 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
  40   "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
  41
  42   "KP88 COR 221156 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
  43   "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
  44
  45   "KP88 COR 221156 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
  46   "AO2 TNO SLP143 P0007 6//// 70109 T00890084 10100 20089 55005",
  47
  48    NULL,
  49
  50
  51  "EPIT 1755 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
  52  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
  53  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
  54  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
  55  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
  56  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
  57  "SFC VIS 1 1/2 VIS 1/2V3/4",
  58
  59    "KFAR 181154Z 10003KT 1/4SM HZ CLR 16/13 A2988 RMK AO2 "
  60    "SLP117 56012 10345 20226 T01610133 $",
  61
  62    "KFAR 181154Z 10003KT 1/SM HZ CLR 16/13 A2988 RMK AO2 "
  63    "SLP117 56012 10345 20226 T01610133 $",
  64
  65
  66
  67
  68 "RKSS 21009KT 1400 RP2000 // ////// 21/20 1006/2972 NOSIG",
  69
  70 "RKSS 1200 21009KT 1400 RP2000 // ////// 21/20 1006/2972 NOSIG",
  71
  72 "RKSS 1130Z 23011KT 1100 R14R/P1500N R14L/P1500N BR SCT010 BKN030 "
  73 "BKN080 21/21 Q1006 NOSIG",
  74
  75 "RKSS 1130Z 23011KT 1100 R14R/P1500 R14L/P1500 BR SCT010 BKN030 "
  76 "BKN080 21/21 Q1006 NOSIG",
  77
  78 NULL,
  79    "KFAR 181154Z 10003KT 4SM HZ CLR 16/13 A2988 RMK AO2 "
  80    "SLP117 56012 1//// 2//// T01610133 $",
  81
  82    "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
  83    "SF6SC1 VSBY RDCE DUE LO CLD SLP186",
  84
  85    "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
  86    "SF6SC1 VSBY RDCE DUE10 LO CLD SLP186",
  87
  88    "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
  89    "SF6SC1 VSBY RDCE DUE9 LO CLD SLP186",
  90
  91    "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
  92    "SF6SC1 VSBY RDCE FZDZE10 LO CLD SLP186",
  93
  94    "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
  95    "SF6SC1 VSBY RDCE FZDZE9 LO CLD SLP186",
  96
  97
  98
  99
 100
 101 "MKJP 1400Z 13011KT 9999 FEW022 30/XX Q1015",
 102 "MKJP 1400Z 13011KT 9999 FEW022 M30/XX Q1015",
 103 "MKJP 1400Z 13011KT 9999 FEW022 MM/XX Q1015",
 104 "MKJP 1400Z 13011KT 9999 FEW022 MM/30 Q1015",
 105 "MKJP 1400Z 13011KT 9999 FEW022 MM/M30 Q1015",
 106
 107
 108
 109
 110   "EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 BKN045 OVC090 "
 111   "SCT120 FEW250 RMK OCNL LTGICCG OHD",
 112
 113   "EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 07/01 Q1011 "
 114   "RMK TEMPO 8000 -SHRA BKN015 FRQ LTG VC",
 115
 116   "EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 07/01 Q1011 "
 117   "RMK TEMPO 8000 -SHRA BKN015 LTG DSNT W",
 118
 119
 120   "METAR KLAX 281156Z AUTO VRB100G135KT 130V210 3 1/2SM "
 121   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT FC "
 122   "+TS BLPY FEW/// SCT000 BKN050 SCT150 OVC250 3/M1 A2991 RMK "
 123   "TORNADO B13E45 6 NE MOV E A02 PK WND 18515/45 "
 124   "WSHFT 1350 FROPA TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 125   "VIS 2 1/2 RY11 "
 126   "DVR/1000V1600FT "
 127   "OCNL LTG VCY STN "
 128   "RAB1030E1145 FZDZE56 BLPYE57 CIG 1000V1500 CIG 020 RY11 "
 129   "PRESFR PRESRR SLP013 FG FEW/// HZ SCT000 VIS NW 2 1/2 GR 3/4 "
 130   "VIRGA SE -XRAFG3 CIGE005 BKN014 V OVC "
 131   "FU BKN020 NOSPECI LAST 8/365 SNINCR 2/10 4/178 "
 132   "933125 98096 P 0125 60225 70565 "
 133   "T00261015 10369 21026 "
 134   "404800360 52101 VISNO RY05 CHINO RY27 PNO RVRNO "
 135   "PWINO FZRANO TSNO $",
 136
 137
 138   "KBOS 251356Z 26011KT 10SM CLR 12/02 A2995 RMK AO2 SC VCNTY "
 139   "STN SSE-NNW SCT CI ABV SLP141 T01220023",
 140
 141   "EFHK 36009KT 340V060 CAVOK 12/M02 Q1013 NOSIG",
 142   "EGKK 24011KT 210V300 9999 SCT020 BKN045 12/06 Q1007 NOSIG",
 143   "EGPD 31018KT 8000 RA FEW013 BKN021 OVC045 06/04 Q0994 NOSIG",
 144   "EKCH 16012KT CAVOK 20/07 Q1006 NOSIG",
 145   "ESKN 10014KT 9000 BR SCT100 14/04 Q1010",
 146   "LOWW 231450Z 14017KT CAVOK 23/07 Q1010 NOSIG",
 147
 148
 149   "METAR CYCH 171500Z CCA 30017KT 2SM -SN BKN006",
 150
 151   "METAR CYOW 171500Z CCA 30017KT 2SM -SN BKN006 OVC020 00/M02 "
 152   "A2957 RMK S35F4NS1 /S01/ SNW WET SNW MELTG ON GRND CIG 5-7 "
 153   "SLP018",
 154
 155   "KAST 221156Z AUTO 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
 156   "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005"
 157   " TSB0159E30 TS SE MOV NE",
 158
 159   "KAST 221156Z AUTO 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
 160   "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005"
 161   " TSE0159 TS SE",
 162
 163   "KHVR 1756Z 31007KT 5SM -SN SCT011 BKN024 OVC030 M05/M08 A3056 "
 164   "RMK AOA 933004 "
 165   "BKN V SCT TNO PCPN 000 $ SLP389 4/015 60002 "
 166   "T10501077 11050 21078 51010",
 167
 168   "SPECI KGFI 041420Z AUTO 18030KT 3 1/2SM RVRNO TS -RA BKN008 OVC060 "
 169   "26/22 A2991 RMK A02 RA15TSB20 PRESFR SLP 101 P 0000 T02640218",
 170
 171   "METAR KCLE 281156Z 170100G135KT 110V180  M1/4SM "
 172   "R01L/P6000FT +TSSHRA VCFG "
 173   "BKN025 SCT100 OVC200 M26/ A2991 RMK PK WND 18515/45 A02 "
 174   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 175   "CIG 1000V1500 PRESFR FRQ LTG CG NW "
 176   "RAB1030E1145 FZDZE56 PRESRR SLP135 GS "
 177   "T1263 "
 178   "VIRGA NW 8/365 4/178 P 0125 60225 7//// 70565 10369 21026 "
 179   "404800360 52101 PWINO FZRANO TSNO $",
 180
 181   "CYQR 161700Z 15015KT 15SM SCT045 SCT090 BKN250 10/03 A2955 "
 182   "RMK SC1AC2C11 OB TAKEN H+ 5 DUE AWOS FAILURE SLP027",
 183
 184
 185
 186
 187  "KPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 188  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 189  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 190  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 191  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 192  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 193  "SFC VIS 1 1/2 VIS 1V2",
 194
 195
 196
 197
 198
 199   "SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
 200   "A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
 201   "SLP 701 P 0254 199/182",
 202
 203   "SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
 204   "A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
 205   "SLP701 P0254 199/182",
 206
 207 "KHLN 281156Z AUTO 27005KT 10SM OVC023 07/05 A3011 RMK AOA OVC V "
 208 "BKN $ SLP202 60000 70001 T00670050 10122 20061 53003",
 209
 210 "KPHX 281156Z 12004KT 10SM CLR 15/05 A2996 RMK AOA SLP135 T01500050 "
 211 "10250 20150 53006",
 212 "KFCA 281156Z 30003KT 10SM CLR 06/02 A3009 RMK AO TNO $ SLP191 "
 213 "T00610023 10167 20056 53003",
 214 "KAST 281156Z 00000KT 10SM BKN095 09/08 A2997 RMK AOA SLP150 "
 215 "T00940084 10161 20094 52005 ",
 216 "KHVR 281156Z 03003KT 10SM OVC020 09/07 A3010 RMK AO TNO ZRNO "
 217 "$ SLP194 T00940073 10156 20089 51005",
 218 "KGGW 281156Z 35006KT 5SM BR OVC010 10/09 A3003 RMK AOA $ SLP177 "
 219 "70003 T01000095 10156 20110 53008",
 220 "KELY 1153Z AUTO 14004KT 10SM SCT075 01/M01 A3011 RMK AOA TNO ZRNO "
 221 "SLP171 70001 T00061011 10139 21006 51005",
 222 "KFLG 281156Z 29006KT 10SM CLR 04/M01 A3012 RMK AO TNO SLP147 "
 223 "T00391011 21006 51004",
 224 "KGTF 281156Z 27005KT 7SM BKN080 04/04 A3010 RMK AOA SLP205 "
 225 "T00440045 10117 20039 51006",
 226
 227 "K13A 1918Z 20011KT 26/M06 RMK AO PKWND 020/RNO 644V264 T02611061",
 228
 229 "KP88 1919Z 09001KT 14/03 RMK AO / PKWND 002/RNO 158 Z T01440034",
 230
 231 "K40B 1924Z 29004KT 15/M07 RMK AO PKWND 011/RM MV263 T01501072",
 232
 233    "KGGW 1756Z 33018KT 10SM OVC015 M03/M06 A3041 RMK AOA SLP338 "
 234    "4/007 60002 T10281055 11028 21072 51009",
 235    "KPHX 1756Z 130004KT 10SM CLR 18/M03 A3001 RMK AOA SLP154 "
 236    "T01781033 10178 20067 58007",
 237    "KFCA 1756Z 29005KT 10SM CLR 05/M11 A3049 RMK AOA TNO SLP352 "
 238    "T00501111 10050 21044 50004",
 239    "KAST 1756Z 01006KT 10SM CLR 11/04 A3047 RMK AOA SLP316 "
 240    "T01110045 10111 20000 50002",
 241    "KELY 1753Z 34010KT 10SM CLR 01/M07 A3022 RMK AOA TNO ZRNO "
 242    "SLP240 T00111066 10011 21078 58007",
 243    "KFLG 1756Z 07006KT 10SM CLR 06/M12 A3009 RMK AO TNO ZRNO "
 244    "SLP178 T00561122 10061 21100 58005",
 245    "KGTF 1756Z 35010KT 1/2SM -SN FG VV09 M06/M08 A3051 RMK AOA "
 246    "933004 SFC VSBY 3/4 "
 247    "PCPN M SLP393 60010 T10611077 11044 21067 53013",
 248    "KHLN 1756Z 35012KT 10SM SCT032 OVC060 M02/M09 A3048 RMK AOA "
 249    "SLP369 60000 T10171094 11017 21061 53006",
 250    "KAST 1756Z 01006KT 10SM CLR 11/04 A3047 RMK AOA SLP316 61104 "
 251    "71235 T01110045 10111 20000 401720056 58002",
 252   "METAR KLAX 04281156Z AUTO VRB100G135KT 130V210 3 1/2SM "
 253   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT FC "
 254   "+TS BLPY FEW000 BKN050 SCT150 OVC250 3/M1 A2991 RMK "
 255   "TORNADO B13 DSNT NE A02 PK WND 18515/45 "
 256   "WSHFT 1350 FROPA TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 257   "VIS 2 1/2 RY11 OCNL LTG VCY STN "
 258   "RAB1030E1145 FZDZE56 BLPYE57 CIG 1000V1500 CIG 020 RY11 "
 259   "PRESFR PRESRR SLP013 FG FEW000 VIS NW2 1/2 GR 3/4 "
 260   "VIRGA SE -XRAFG3 CIGE005 BKN014 V OVC "
 261   "FU BKN020 NOSPECI LAST 8/365 SNINCR 2/10 4/178 "
 262   "933125 98096 P 0125 60225 70565 "
 263   "T00261015 10369 21026 "
 264   "404800360 52101 PWINO FZRANO TSNO $",
 265
 266
 267
 268   "METAR KGFI 041356Z AUTO 17012KT 130V210 3 1/2SM R15L/0500FT -RA "
 269   "SCT050 OVC110 26/18 A2991 RMK FUNNEL CLOUDS A02 RAB30 "
 270   "SLP 101 GR M1/4 VIRGA SCT V BKN P 0010 T02640178",
 271
 272   "METAR KGFI 041356Z AUTO 05008KT 10SM R15L/P6000FT CLR A2991 "
 273   "RMK WATERSPOUTS VCY STN NW A02 SLP 101 10288 20243 52021 $ ",
 274
 275   "SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
 276   "A2900 RMK A02A PK WND 18056/28 OCNL LTG AP "
 277   "RAB15E25TSB20 FCB1430 PRESFR "
 278   "SLP 701 P 0254 T01990182",
 279
 280   "KABE 281900Z NIL",
 281
 282   "METAR KPIT NIL",
 283
 284   "METAR KCLE 04281156Z 170100G135KT 110V180  M1/4SM "
 285   "R01L/P6000FT +TSSHRA VCFG "
 286   "BKN025 SCT100 OVC200 M26/ A2991 RMK PK WND 18515/45 A02 "
 287   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 288   "CIG 1000V1500 PRESFR FRQ LTG CG NW "
 289   "RAB1030E1145 FZDZE56 PRESRR SLP135 GS "
 290   "T1263 "
 291   "VIRGA NW 8/365 4/178 P 0125 60225 7//// 70565 10369 21026 "
 292   "404800360 52101 PWINO FZRANO TSNO $",
 293
 294   "METAR KPHL 040256Z AUTO 170100G135KT 130V210  1/2SM "
 295   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
 296   "FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
 297   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 LTG DSNT "
 298   "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP037 GR 2 3/4 "
 299   "VIRGA E 8/365 4/178 P 0125 70565 21026 T0263 10369 60225 "
 300   "404800360 52101 PWINO FZRANO TSNO $",
 301
 302   "SPECI KGFI 041420Z AUTO 18030KT 2 1/2SM RVRNO TS -RA BKN008 "
 303   "OVC060 25/22 A2991 RMK A02 LTG DSNT W "
 304   "RAB15TSB20 PRESFR SLP101 P 0000 "
 305   "254/218",
 306
 307   "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
 308   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
 309   "FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
 310   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 311   "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR M1/4 "
 312   "VIRGA SE 8/365 4/178 P 0125 6//// 60225 70565 T0263 10369 21026 "
 313   "404800360 52101 PWINO FZRANO TSNO $",
 314
 315
 316
 317
 318   "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
 319   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
 320   "FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
 321   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 322   "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
 323   "VIRGA 35 8/365 4/178 P 0125 6//// 60225 70565 T0263 10369 21026 "
 324   "VIRGA 35 8/365 4/178 P 0125 21026 70565 10369 60225 T0263 21026 "
 325   "404800360 52101 PWINO FZRANO TSNO $",
 326
 327
 328   "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
 329   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
 330   "FC +TS BKN050 SCT150 OVC250 3/M1 A2991 RMK A02 PK WND 18515/45 "
 331   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 332   "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
 333   "VIRGA 35 8/365 4/178 P 0125 60225 70565 T00261015 10369 21026 "
 334   "404800360 52101 PWINO FZRANO TSNO $",
 335
 336   "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
 337   "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
 338   "FC +TS BKN050 SCT150 OVC250 3/M1 A2991 RMK A02 PK WND 185150/1345 "
 339   "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
 340   "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
 341   "VIRGA 35 8/365 4/178 P 0125 60225 70565 T00261015 10369 21026 "
 342   "404800360 52101 PWINO FZRANO TSNO",
 343
 344
 345
 346   "METAR KGFI 041356Z AUTO 05008KT 10SM R15L/P6000FT CLR A2991 RMK "
 347   "A02 SLP 101 10288 20243 52021",
 348   "SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
 349   "M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
 350   "SLP 701 P 0254 M199/M182",
 351
 352   "SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
 353   "M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
 354   "SLP 701 P 0254 M199/182",
 355
 356   "SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
 357   "M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
 358   "SLP 701 P 0254 199/M182",
 359
 360  "METAR APIT 171755Z AUTO 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 361  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 362  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 363  "RMK 4/369 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 364  "PCPN 0009 8/563 WSHFT 1715 PK WND 2032/1725 "
 365  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 366  "SFC VIS 1 1/2 VIS 1 1/2V2 SLP875 SGB1213E1225",
 367
 368  "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
 369  "          Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK SLP056 "
 370  "RAE0123",
 371
 372  "SPECI APIT 171755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 373  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 374  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 375  "RMK 58033 6003/ TWELVE 70125 8/321 10039 20029 410840112 "
 376  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 377  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 378  "SFC VIS 1 1/2 VIS 1 SLP875 FGB1713",
 379
 380  "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 381  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 382  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 383  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 384  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 385  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 386  "SFC VIS 1 1/2 VIS 1V2 SLP875",
 387
 388
 389  "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 390  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 391  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 392  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 393  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 394  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 395  "SFC VIS 1 1/2 VIS 1 1/2V2 1/2 SLP875",
 396
 397  "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 398  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 399  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 400  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 401  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 402  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 403  "SFC VIS 1 1/2 VIS 1V2 1/2 SLP875",
 404
 405
 406  "EGPF 1720Z 00000KT 9999 -SHRA STC014 SCT020CB BNK024 12/09 "
 407  "Q1003 NOSIG",
 408
 409  "NZAA 1700Z 03010KT 30KM 03 5CU022 7SC035 11/07 Q1006.5 NOSIG",
 410  "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
 411  "     Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK KAUKAU 30050KT",
 412  "DGAA 1800Z 22012KT 9999 SCT009 BKN120 25/21 Q1015",
 413  "DAAT 1830Z 30010KT CAVOK 29/06 Q1019",
 414
 415  "GQPP 1800Z 34023KT 3000 DRSA SKC 24/20 Q1011 NSG",
 416  "DAAG 1830Z 06006KT 9999 SCT020 25/22 Q1015",
 417  "DABB 1830Z 04010KT 9999 SCT030TCU SCT033CB 27/18 Q1017",
 418  "DABC 1830Z 00000KT 9999 SCT026TCU SCT036CB 22/18 Q1020 RETS",
 419
 420  "NZAA 1700Z 03010KT 30KM 03 5CU022 7SC035 11/07 Q1006.5 NOSIG",
 421  "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
 422  "          Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK K",
 423  "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
 424  "     Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK KAUKAU 30050KT",
 425  "DGAA 1800Z 22012KT 9999 SCT009 BKN120 25/21 Q1015",
 426
 427  "GFLL 1900Z NIL",
 428
 429  "GOOY 1800Z 03006G17KT 340V080 6000 TSRA BKN016 BKN030CB "
 430  "BKN133 26/23 Q1013 NOSIG",
 431
 432  "GCXO 1930Z 32018KT 8000 SCT003 SCT007 18/16 Q1019",
 433
 434  "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 435  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 436  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 437  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 438  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 439  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 440  "SFC VIS 1 1/2 VIS 1 1/2V2",
 441
 442  "BPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 443  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 444  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 445  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 446  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 447  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 448  "SFC VIS 1 1/2 VIS 1V2",
 449
 450  "CPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 451  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 452  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 453  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 454  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 455  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 456  "SFC VIS 1 1/2 VIS 1V2 1/2",
 457
 458  "DPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 459  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 460  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 461  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 462  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 463  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 464  "SFC VIS 1 1/2 VIS 1 1/2V2 1/2",
 465
 466
 467  "FPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 468  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 469  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 470  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 471  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 472  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 473  "SFC VIS 1 1/2 VIS 3/4V2 1/2",
 474
 475  "GPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
 476  "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
 477  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
 478  "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
 479  "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
 480  "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
 481  "SFC VIS 1 1/2 VIS 3/4V3",
 482
 483  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 484  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/M16 A2992",
 485
 486  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 487  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/16 A2992",
 488
 489  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 490  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/M16 A2992",
 491
 492  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 493  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB MM/M16 A2992",
 494
 495  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 496  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB MM/16 A2992",
 497
 498  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 499  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/MM A2992",
 500
 501  "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
 502  "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/MM A2992",
 503
 504         NULL};
 505
 506    /***************************/
 507    /* DECLARE LOCAL VARIABLES */
 508    /***************************/
 509
 510    Decoded_METAR Metar;
 511    Decoded_METAR *Mptr = &Metar;
 512    int j,
 513        ErReturn;
 514
 515
 516    /***************************************************/
 517    /* START BODY OF MAIN ROUTINE FOR CALLING DcdMETAR */
 518    /***************************************************/
 519
 520    j = 0;
 521
 522    while( string[j] != NULL)
 523    {
 524             /*-- PRINT INPUT METAR REPORT ----------------------------*/
 525       printf("INPUT METAR REPORT: %s\n",string[j] );
 526
 527             /*-- DECODE INPUT REPORT ---------------------------------*/
 528       if ( (ErReturn = DcdMETAR( string[ j ], Mptr )) != 0 )
 529          printf("DcdMETAR:  Error Return Number: %d\n",ErReturn);
 530
 531             /*-- PRINT DECODED METAR REPORT ELEMENTS -----------------*/
 532       prtDMETR( Mptr );
 533
 534       j++;
 535
 536    }
 537
 538    return 0;
 539 }