simgear/metar/Drvmetar.c

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