Energy

Energy 
url <- paste0("https://bank.stat.gl/api/v1/", language, "/Greenland/EN/EN20/ENX1ACT.px")

ENX1ACT_raw <- 
  url |> 
  statgl_fetch(
    type      = 0,
    product   = px_all(),
    use       = 0,
    time      = px_top(5),
    .col_code = T
  ) |> 
  as_tibble()

ENX1ACT <- 
  ENX1ACT_raw |> 
  unite(combi, use, type, sep = " ") |> 
  mutate(product = product |> fct_inorder()) |> 
  spread(time, value)

ENX1ACT |> 
  select(-1) |> 
  rename(" " = 1) |> 
  statgl_table() |> 
  row_spec(1, bold = T) |> 
  add_footnote(ENX1ACT_raw[[1]][1], notation = "symbol")
2018 2019 2020 2021 2022
Total 8.885 8.998 8.827 9.258 10.002
Gas oil 5.266 5.086 5.463 6.035 6.494
Gasoline 730 820 815 856 843
Kerosene / Jet Fuel 817 850 468 561 764
Diesel Fuel Arctic 189 170 170 170 162
LPG 3 3 3 3 3
Aviation Gasoline 1 1 0 0 1
Fueloil 302 515 282 1 0
Wasteoil 9 9 9 9 9
Waste heat 98 110 103 102 88
Hydropower 1.469 1.434 1.513 1.521 1.639
* Actual energy consumption


See the table in our Statbank: ENX1ACT

url <- paste0("https://bank.stat.gl/api/v1/", language, "/Greenland/EN/EN20/ENX2CO2.px")

ENX2CO2_raw <- 
  url |> 
  statgl_fetch(
    type      = 0,
    gas       = px_all(),
    time      = px_top(5),
    .col_code = T
  ) |> 
  as_tibble()

ENX2CO2 <- 
  ENX2CO2_raw |> 
  spread(gas, value)

ENX2CO2 |> 
  select(-1) |> 
  rename(" " = 1) |> 
  statgl_table() |> 
  add_footnote(ENX2CO2[[1]][1], notation = "symbol")
Carbon dioxide (CO2) Methane (CH4) Nitrous oxide (N2O)
2018 540.255 50,9 8,68
2019 550.961 52,1 9,15
2020 532.904 52,0 8,39
2021 562.527 53,5 8,90
2022 609.204 56,1 10,00
* Actual emission


See the table in our Statbank: ENX2CO2

Climate 
url <- paste0("https://bank.stat.gl/api/v1/", language, "/Greenland/EN/EN30/ENX1MID.px")

ENX1MID_raw <- 
  url |> 
  statgl_fetch(
    measuring         = px_all(),
    time              = px_top(),
    "weather station" = 5,
    month             = px_all(),
    .col_code         = T
  ) |> 
  as_tibble()

ENX1MID <- 
  ENX1MID_raw |> 
  mutate(month = month |> fct_inorder(),
         measuring = measuring |> fct_inorder()) |> 
  spread(measuring, value) |> 
  unite(combi, `weather station`, time, sep = " ")
  
ENX1MID |> 
  select(-1) |> 
  rename(" " = 1) |> 
  statgl_table() |> 
  add_footnote(ENX1MID[[1]][1], notation = "symbol")
Average Maximum temperature Minimum temperature
January -4,0 2,6 -9,8
February -7,6 3,9 -14,8
March -6,2 7,3 -22,2
April -1,4 7,6 -11,8
May 1,6 12,3 -3,8
June 4,9 14,9 0,0
July 7,9 18,1 0,5
August 7,9 16,6 2,8
September 2,8 12,2 -2,3
October 0,8 7,8 -6,1
November -3,2 6,6 -11,2
December -1,9 12,2 -9,0
* Nuuk 2021


See the table in our Statbank: ENX1MID

Motor vehicles 
url <- paste0("https://bank.stat.gl/api/v1/", language, "/Greenland/EN/EN40/ENXMO1HI.px")

ENXMO1HI_raw <- 
  url |> 
  statgl_fetch(
    ownership = 1:2,
    category  = px_all(),
    time      = px_top(),
    .col_code = T
  ) |> 
  as_tibble()

ENXMO1HI <- 
  ENXMO1HI_raw |> 
  mutate_all(~replace(., is.na(.), 0)) |> 
  mutate(category = category |> fct_inorder()) |> 
  spread(ownership, value)

ENXMO1HI |> 
  select(-time) |> 
  rename(" " = 1) |> 
  statgl_table() |> 
  row_spec(1, bold = T) |> 
  add_footnote(ENXMO1HI[[2]][1], notation = "symbol")
Businesses Private households
Motor vehicles total 6.763 7.748
Taxis 175 0
Rental cars 0 0
Cars 2.250 4.299
Buser 108 0
Emergency vehicles total 216 0
  • Of which Fire-engines
216 0
  • Of which Ambulances
0 0
Vans and Trucks total 1.609 90
  • Of which Vans
1.161 90
  • Of which Trucks
448 0
Motorcycles 0 4
Construction machineries 1.186 0
Trailers 338 121
Snowmobiles 459 2.848
ATV and 4-wheeler 354 384
Other motor vehicles 68 2
* 2023

See the table in our Statbank: ENXMO1HI
Last updated: 17. april 2024
LS0tDQpwYXJhbXM6DQogIGxhbmc6ICJkYSINCm91dHB1dDoNCiAgc3RhdGdsOjpzdGF0Z2xfcmVwb3J0Og0KICAgIGNvZGVfZG93bmxvYWQ6IHRydWUNCiAgICBjb2RlX2ZvbGRpbmc6IGhpZGUNCmVkaXRvcl9vcHRpb25zOiANCiAgY2h1bmtfb3V0cHV0X3R5cGU6IGNvbnNvbGUNCi0tLQ0KDQpgYGB7ciBzZXR1cCwgaW5jbHVkZT1GQUxTRX0NCg0Ka25pdHI6Om9wdHNfY2h1bmskc2V0KA0KCWVjaG8gICAgPSBUUlVFLA0KCW1lc3NhZ2UgPSBGQUxTRSwNCgl3YXJuaW5nID0gRkFMU0UsDQoJY2xhc3Mub3V0cHV0ID0gInNjcm9sbC0xMDAiDQopDQoNCmxpYnJhcnkoInRpZHl2ZXJzZSIpDQpsaWJyYXJ5KCJzdGF0Z2wiKQ0KbGlicmFyeSgia2FibGVFeHRyYSIpDQpsaWJyYXJ5KCJsdWJyaWRhdGUiKQ0KbGlicmFyeSgieWFtbCIpDQoNCmxhbmd1YWdlICA8LSBwYXJhbXMkbGFuZw0Kb3B0aW9uICAgIDwtIHBhc3RlMCgiP2xhbmc9IiwgbGFuZ3VhZ2UsICImc2VsZWN0IikNCmxvZ28gICAgICA8LSBwYXN0ZTAoZ2V0d2QoKSwiL2FkZC9sb2dvLmdpZiIpDQp0eHQgICAgICAgPC0gcmVhZF95YW1sKHBhc3RlMChnZXR3ZCgpLCAiL2FkZC90eHQueW1sIiksIGZpbGVFbmNvZGluZyA9ICJJU08tODg1OS0xIikNCnNvdXJjZSAgICA8LSB0eHQkc291cmNlW2xhbmd1YWdlXSAlPiUgdW5saXN0KCkNCg0KeGFyaW5nYW5FeHRyYTo6dXNlX2NsaXBib2FyZCgpDQoNCmBgYA0KDQpgYGB7Y3NzLCBlY2hvID0gRkFMU0V9DQoNCi5hY2NvcmRpb24gew0KICBiYWNrZ3JvdW5kLWNvbG9yOiAjOTE5OTAwOw0KICBjb2xvcjogd2hpdGU7DQogIGN1cnNvcjogcG9pbnRlcjsNCiAgcGFkZGluZzogMThweDsNCiAgd2lkdGg6IDEwMCU7DQogIGJvcmRlcjogbm9uZTsNCiAgYm9yZGVyLXJhZGl1czogNXB4Ow0KICB0ZXh0LWFsaWduOiBsZWZ0Ow0KICBvdXRsaW5lOiBub25lOw0KICBmb250LXNpemU6IDE1cHg7DQogIHRyYW5zaXRpb246IDAuNHM7DQp9DQoNCi5hY3RpdmUsIC5hY2NvcmRpb246aG92ZXIgew0KICBiYWNrZ3JvdW5kLWNvbG9yOiAjZjk3MjQyOw0KfQ0KDQouYWNjb3JkaW9uOmFmdGVyIHsNCiAgY29udGVudDogJ1wwMDJCJzsNCiAgY29sb3I6ICM3Nzc7DQogIGZvbnQtd2VpZ2h0OiBib2xkOw0KICBmbG9hdDogcmlnaHQ7DQogIG1hcmdpbi1sZWZ0OiA1cHg7DQp9DQoNCi5hY3RpdmU6YWZ0ZXIgew0KICBjb250ZW50OiAiXDIyMTIiOw0KfQ0KDQoucGFuZWwgew0KICBwYWRkaW5nOiAwcHggNXB4IDBweCA1cHg7DQogIGJhY2tncm91bmQtY29sb3I6IHdoaXRlOw0KICBtYXgtaGVpZ2h0OiAwOw0KICBvdmVyZmxvdzogaGlkZGVuOw0KICB0cmFuc2l0aW9uOiBtYXgtaGVpZ2h0IDAuMnMgZWFzZS1vdXQ7DQp9DQoNCmRldGFpbHMgew0KICB3aWR0aDogMTAwJTsNCn0NCg0KZGV0YWlscyA+IHN1bW1hcnkgew0KICBwYWRkaW5nOiA0cHggMTJweDsNCiAgd2lkdGg6IDEwMCU7DQogIGJhY2tncm91bmQtY29sb3I6ICMwMDdmOTk7DQogIGJvcmRlcjogc29saWQ7DQogIGJvcmRlci1jb2xvcjogd2hpdGU7DQogIGJvcmRlci1yYWRpdXM6IDVweDsNCiAgY3Vyc29yOiBwb2ludGVyOw0KICBmb250LXNpemU6IDE1cHg7DQogIGNvbG9yOiB3aGl0ZTsNCn0NCg0KZGV0YWlsc1tvcGVuXSA+IHN1bW1hcnkgew0KICBiYWNrZ3JvdW5kLWNvbG9yOiAjZmFhNDFhOw0KfQ0KDQoNCi50aXRsZSB7DQogIGNvbG9yOiAjMWI1NDYzOw0KICBmb250LXNpemU6IDM2cHg7DQp9DQoNCg0KLnBlcnNvbmVyIHsNCiAgYm94LXNoYWRvdzogM3B4IDNweCA0cHggYmxhY2s7DQogIGJhY2tncm91bmQ6ICMwMDQ0NTk7DQogIHBhZGRpbmctcmlnaHQ6IDE1cHg7DQogIHBhZGRpbmctbGVmdDogMTZweDsNCiAgcGFkZGluZy10b3A6IDAuMXB4Ow0KICBwYWRkaW5nLWJvdHRvbTogMXB4Ow0KICBmb250LXNpemU6IDExcHg7DQogIGNvbG9yOiB3aGl0ZTsNCiAgdmVydGljYWwtYWxpZ246IG1pZGRsZTsNCn0NCg0KLsO4a29ub21pIHsNCiAgYm94LXNoYWRvdzogM3B4IDNweCA0cHggYmxhY2s7DQogIGJhY2tncm91bmQ6ICMwMDdGOTk7DQogIHBhZGRpbmctcmlnaHQ6IDE1cHg7DQogIHBhZGRpbmctbGVmdDogMTZweDsNCiAgcGFkZGluZy10b3A6IDFweDsNCiAgcGFkZGluZy1ib3R0b206IDAuMXB4Ow0KICBmb250LXNpemU6IDExcHg7DQogIGNvbG9yOiB3aGl0ZTsNCiAgdmVydGljYWwtYWxpZ246IG1pZGRsZTsNCn0NCg0KLnR2w6ZyZ8OlZW5kZSB7DQogIGJveC1zaGFkb3c6IDNweCAzcHggNHB4IGJsYWNrOw0KICBiYWNrZ3JvdW5kOiAjZmFhNDFhOw0KICBwYWRkaW5nLXJpZ2h0OiAxNXB4Ow0KICBwYWRkaW5nLWxlZnQ6IDE2cHg7DQogIHBhZGRpbmctdG9wOiAwLjFweDsNCiAgcGFkZGluZy1ib3R0b206IDFweDsNCiAgZm9udC1zaXplOiAxMXB4Ow0KICBjb2xvcjogd2hpdGU7DQogIHZlcnRpY2FsLWFsaWduOiBtaWRkbGU7DQp9DQoNCi5jb250YWluZXIgew0KICB3aWR0aDogaW5oZXJpdDsNCn0NCg0KLnNjcm9sbC0xMDAgew0KICBtYXgtaGVpZ2h0OiAxMDA7DQogIG92ZXJmbG93LXk6IGF1dG87DQogIGJhY2tncm91bmQtY29sb3I6IGluaGVyaXQ7DQp9DQoNCg0KcHJlIHsNCiAgbWF4LWhlaWdodDogMzAwcHg7DQogIG92ZXJmbG93LXk6IGF1dG87DQp9DQoNCnByZVtjbGFzc10gew0KICBtYXgtaGVpZ2h0OiAzMDBweDsNCn0NCg0KYGBgDQoNCjxicj4NCjxicj4NCg0KPGNlbnRlcj4NCg0KLS0tIA0KDQojIFtgciB0eHQkRU4kdGl0bGVbbGFuZ3VhZ2VdYF17LnRpdGxlfQ0KDQotLS0NCg0KPC9jZW50ZXI+DQoNCjxkZXRhaWxzPiA8c3VtbWFyeT4gYHIgdHh0JEVOJHN1YjFbbGFuZ3VhZ2VdYCA8L3N1bW1hcnk+DQo8YnI+DQo8YnV0dG9uIGNsYXNzPSJhY2NvcmRpb24iPiBgciAnKlRhYmVsIDE6KiB7c3RhdGdsX21ldGEoZ2x1ZTo6Z2x1ZSgiaHR0cHM6Ly9iYW5rLnN0YXQuZ2wvYXBpL3YxL3tsYW5ndWFnZX0vR3JlZW5sYW5kL0VOL0VOMjAvRU5YMUFDVC5weCIpKSB8PiBwbHVjaygidGl0bGUiKX0nIHw+IGdsdWU6OmdsdWUoKSBgIDwvYnV0dG9uPiA8ZGl2IGNsYXNzPSJwYW5lbCI+DQoNCmBgYHtyIEVOWDFBQ1R9DQoNCnVybCA8LSBwYXN0ZTAoImh0dHBzOi8vYmFuay5zdGF0LmdsL2FwaS92MS8iLCBsYW5ndWFnZSwgIi9HcmVlbmxhbmQvRU4vRU4yMC9FTlgxQUNULnB4IikNCg0KRU5YMUFDVF9yYXcgPC0gDQogIHVybCB8PiANCiAgc3RhdGdsX2ZldGNoKA0KICAgIHR5cGUgICAgICA9IDAsDQogICAgcHJvZHVjdCAgID0gcHhfYWxsKCksDQogICAgdXNlICAgICAgID0gMCwNCiAgICB0aW1lICAgICAgPSBweF90b3AoNSksDQogICAgLmNvbF9jb2RlID0gVA0KICApIHw+IA0KICBhc190aWJibGUoKQ0KDQpFTlgxQUNUIDwtIA0KICBFTlgxQUNUX3JhdyB8PiANCiAgdW5pdGUoY29tYmksIHVzZSwgdHlwZSwgc2VwID0gIiAiKSB8PiANCiAgbXV0YXRlKHByb2R1Y3QgPSBwcm9kdWN0IHw+IGZjdF9pbm9yZGVyKCkpIHw+IA0KICBzcHJlYWQodGltZSwgdmFsdWUpDQoNCkVOWDFBQ1QgfD4gDQogIHNlbGVjdCgtMSkgfD4gDQogIHJlbmFtZSgiICIgPSAxKSB8PiANCiAgc3RhdGdsX3RhYmxlKCkgfD4gDQogIHJvd19zcGVjKDEsIGJvbGQgPSBUKSB8PiANCiAgYWRkX2Zvb3Rub3RlKEVOWDFBQ1RfcmF3W1sxXV1bMV0sIG5vdGF0aW9uID0gInN5bWJvbCIpDQoNCg0KYGBgDQo8YnI+DQpbIVtdKGByIGxvZ29gKXt3aWR0aD00MH1gciBwYXN0ZShzb3VyY2UsICJFTlgxQUNUIilgXShgciBwYXN0ZTAoImh0dHBzOi8vYmFuay5zdGF0LmdsOjQ0My9zcS8zYzU0N2VmOS01YzhiLTQ3YTUtOTFiOS0yNTljNWYwYWQxNDYiLCBvcHRpb24pYCl7dGFyZ2V0PSJfYmxhbmsifQ0KPC9kaXY+IA0KDQo8YnV0dG9uIGNsYXNzPSJhY2NvcmRpb24iPiBgciAnKlRhYmVsIDI6KiB7c3RhdGdsX21ldGEoZ2x1ZTo6Z2x1ZSgiaHR0cHM6Ly9iYW5rLnN0YXQuZ2wvYXBpL3YxL3tsYW5ndWFnZX0vR3JlZW5sYW5kL0VOL0VOMjAvRU5YMkNPMi5weCIpKSB8PiBwbHVjaygidGl0bGUiKX0nIHw+IGdsdWU6OmdsdWUoKSBgIDwvYnV0dG9uPiA8ZGl2IGNsYXNzPSJwYW5lbCI+DQoNCmBgYHtyIEVOWDJDTzJ9DQoNCnVybCA8LSBwYXN0ZTAoImh0dHBzOi8vYmFuay5zdGF0LmdsL2FwaS92MS8iLCBsYW5ndWFnZSwgIi9HcmVlbmxhbmQvRU4vRU4yMC9FTlgyQ08yLnB4IikNCg0KRU5YMkNPMl9yYXcgPC0gDQogIHVybCB8PiANCiAgc3RhdGdsX2ZldGNoKA0KICAgIHR5cGUgICAgICA9IDAsDQogICAgZ2FzICAgICAgID0gcHhfYWxsKCksDQogICAgdGltZSAgICAgID0gcHhfdG9wKDUpLA0KICAgIC5jb2xfY29kZSA9IFQNCiAgKSB8PiANCiAgYXNfdGliYmxlKCkNCg0KRU5YMkNPMiA8LSANCiAgRU5YMkNPMl9yYXcgfD4gDQogIHNwcmVhZChnYXMsIHZhbHVlKQ0KDQpFTlgyQ08yIHw+IA0KICBzZWxlY3QoLTEpIHw+IA0KICByZW5hbWUoIiAiID0gMSkgfD4gDQogIHN0YXRnbF90YWJsZSgpIHw+IA0KICBhZGRfZm9vdG5vdGUoRU5YMkNPMltbMV1dWzFdLCBub3RhdGlvbiA9ICJzeW1ib2wiKQ0KDQoNCmBgYA0KPGJyPg0KWyFbXShgciBsb2dvYCl7d2lkdGg9NDB9YHIgcGFzdGUoc291cmNlLCAiRU5YMkNPMiIpYF0oYHIgcGFzdGUwKCJodHRwczovL2Jhbmsuc3RhdC5nbDo0NDMvc3EvM2M1NDdlZjktNWM4Yi00N2E1LTkxYjktMjU5YzVmMGFkMTQ2Iiwgb3B0aW9uKWApe3RhcmdldD0iX2JsYW5rIn0NCjwvZGl2PiANCg0KDQo8L2RldGFpbHM+DQoNCg0KPGRldGFpbHM+IDxzdW1tYXJ5PiBgciB0eHQkRU4kc3ViMltsYW5ndWFnZV1gIDwvc3VtbWFyeT4NCjxicj4NCjxidXR0b24gY2xhc3M9ImFjY29yZGlvbiI+IGByICcqVGFiZWwgMzoqIHtzdGF0Z2xfbWV0YShnbHVlOjpnbHVlKCJodHRwczovL2Jhbmsuc3RhdC5nbC9hcGkvdjEve2xhbmd1YWdlfS9HcmVlbmxhbmQvRU4vRU4zMC9FTlgxTUlELnB4IikpIHw+IHBsdWNrKCJ0aXRsZSIpfScgfD4gZ2x1ZTo6Z2x1ZSgpIGAgPC9idXR0b24+IDxkaXYgY2xhc3M9InBhbmVsIj4NCg0KYGBge3IgRU5YMU1JRH0NCg0KdXJsIDwtIHBhc3RlMCgiaHR0cHM6Ly9iYW5rLnN0YXQuZ2wvYXBpL3YxLyIsIGxhbmd1YWdlLCAiL0dyZWVubGFuZC9FTi9FTjMwL0VOWDFNSUQucHgiKQ0KDQpFTlgxTUlEX3JhdyA8LSANCiAgdXJsIHw+IA0KICBzdGF0Z2xfZmV0Y2goDQogICAgbWVhc3VyaW5nICAgICAgICAgPSBweF9hbGwoKSwNCiAgICB0aW1lICAgICAgICAgICAgICA9IHB4X3RvcCgpLA0KICAgICJ3ZWF0aGVyIHN0YXRpb24iID0gNSwNCiAgICBtb250aCAgICAgICAgICAgICA9IHB4X2FsbCgpLA0KICAgIC5jb2xfY29kZSAgICAgICAgID0gVA0KICApIHw+IA0KICBhc190aWJibGUoKQ0KDQpFTlgxTUlEIDwtIA0KICBFTlgxTUlEX3JhdyB8PiANCiAgbXV0YXRlKG1vbnRoID0gbW9udGggfD4gZmN0X2lub3JkZXIoKSwNCiAgICAgICAgIG1lYXN1cmluZyA9IG1lYXN1cmluZyB8PiBmY3RfaW5vcmRlcigpKSB8PiANCiAgc3ByZWFkKG1lYXN1cmluZywgdmFsdWUpIHw+IA0KICB1bml0ZShjb21iaSwgYHdlYXRoZXIgc3RhdGlvbmAsIHRpbWUsIHNlcCA9ICIgIikNCiAgDQpFTlgxTUlEIHw+IA0KICBzZWxlY3QoLTEpIHw+IA0KICByZW5hbWUoIiAiID0gMSkgfD4gDQogIHN0YXRnbF90YWJsZSgpIHw+IA0KICBhZGRfZm9vdG5vdGUoRU5YMU1JRFtbMV1dWzFdLCBub3RhdGlvbiA9ICJzeW1ib2wiKQ0KDQpgYGANCjxicj4NClshW10oYHIgbG9nb2Ape3dpZHRoPTQwfWByIHBhc3RlKHNvdXJjZSwgIkVOWDFNSUQiKWBdKGByIHBhc3RlMCgiaHR0cHM6Ly9iYW5rLnN0YXQuZ2w6NDQzL3NxLzNiMDc5MWI4LTQ3ZTItNDE4My1iNmQ0LWVkOWEzMzBlNzhlYSIsIG9wdGlvbilgKXt0YXJnZXQ9Il9ibGFuayJ9DQo8L2Rpdj4gDQoNCg0KPC9kZXRhaWxzPg0KDQoNCjxkZXRhaWxzPiA8c3VtbWFyeT4gYHIgdHh0JEVOJHN1YjNbbGFuZ3VhZ2VdYCA8L3N1bW1hcnk+DQo8YnI+DQo8YnV0dG9uIGNsYXNzPSJhY2NvcmRpb24iPiBgciAnKlRhYmVsIDQ6KiB7c3RhdGdsX21ldGEoZ2x1ZTo6Z2x1ZSgiaHR0cHM6Ly9iYW5rLnN0YXQuZ2wvYXBpL3YxL3tsYW5ndWFnZX0vR3JlZW5sYW5kL0VOL0VONDAvRU5YTU8xSEkucHgiKSkgfD4gcGx1Y2soInRpdGxlIil9JyB8PiBnbHVlOjpnbHVlKCkgYCA8L2J1dHRvbj4gPGRpdiBjbGFzcz0icGFuZWwiPg0KYGBge3IgRU5YTU8xSEl9DQoNCnVybCA8LSBwYXN0ZTAoImh0dHBzOi8vYmFuay5zdGF0LmdsL2FwaS92MS8iLCBsYW5ndWFnZSwgIi9HcmVlbmxhbmQvRU4vRU40MC9FTlhNTzFISS5weCIpDQoNCkVOWE1PMUhJX3JhdyA8LSANCiAgdXJsIHw+IA0KICBzdGF0Z2xfZmV0Y2goDQogICAgb3duZXJzaGlwID0gMToyLA0KICAgIGNhdGVnb3J5ICA9IHB4X2FsbCgpLA0KICAgIHRpbWUgICAgICA9IHB4X3RvcCgpLA0KICAgIC5jb2xfY29kZSA9IFQNCiAgKSB8PiANCiAgYXNfdGliYmxlKCkNCg0KRU5YTU8xSEkgPC0gDQogIEVOWE1PMUhJX3JhdyB8PiANCiAgbXV0YXRlX2FsbCh+cmVwbGFjZSguLCBpcy5uYSguKSwgMCkpIHw+IA0KICBtdXRhdGUoY2F0ZWdvcnkgPSBjYXRlZ29yeSB8PiBmY3RfaW5vcmRlcigpKSB8PiANCiAgc3ByZWFkKG93bmVyc2hpcCwgdmFsdWUpDQoNCkVOWE1PMUhJIHw+IA0KICBzZWxlY3QoLXRpbWUpIHw+IA0KICByZW5hbWUoIiAiID0gMSkgfD4gDQogIHN0YXRnbF90YWJsZSgpIHw+IA0KICByb3dfc3BlYygxLCBib2xkID0gVCkgfD4gDQogIGFkZF9mb290bm90ZShFTlhNTzFISVtbMl1dWzFdLCBub3RhdGlvbiA9ICJzeW1ib2wiKQ0KDQpgYGANCjxicj4NClshW10oYHIgbG9nb2Ape3dpZHRoPTQwfWByIHBhc3RlKHNvdXJjZSwgIkVOWE1PMUhJIilgXShgciBwYXN0ZTAoImh0dHBzOi8vYmFuay5zdGF0LmdsOjQ0My9zcS84MjEwOWI5YS02ZjIxLTRiOTEtYWI0ZS0yNjUxNzE4Nzk4ZDUiLCBvcHRpb24pYCl7dGFyZ2V0PSJfYmxhbmsifQ0KPC9kaXY+IA0KDQo8L2RldGFpbHM+DQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQo8aHIgc3R5bGU9ImJvcmRlcjoxcHggcmlkZ2UgbGlnaHRncmF5Ij4gPC9ocj4NCjxjZW50ZXI+IDxzcGFuIHN0eWxlPSdjb2xvcjojRDNEM0QzOyBmb250LXNpemU6OTAlOyc+IGByIHBhc3RlKHR4dCR1cGRhdGVbbGFuZ3VhZ2VdLCBmb3JtYXQoU3lzLkRhdGUoKSwgIiVkLiAlQiAlWSIpKWAgPC9zcGFuPiA8L2NlbnRlcj4NCg0KDQoNCg0KPHNjcmlwdD4NCnZhciBhY2MgPSBkb2N1bWVudC5nZXRFbGVtZW50c0J5Q2xhc3NOYW1lKCJhY2NvcmRpb24iKTsNCnZhciBpOw0KDQpmb3IgKGkgPSAwOyBpIDwgYWNjLmxlbmd0aDsgaSsrKSB7DQogIGFjY1tpXS5hZGRFdmVudExpc3RlbmVyKCJjbGljayIsIGZ1bmN0aW9uKCkgew0KICAgIHRoaXMuY2xhc3NMaXN0LnRvZ2dsZSgiYWN0aXZlIik7DQogICAgdmFyIHBhbmVsID0gdGhpcy5uZXh0RWxlbWVudFNpYmxpbmc7DQogICAgaWYgKHBhbmVsLnN0eWxlLm1heEhlaWdodCkgew0KICAgICAgcGFuZWwuc3R5bGUubWF4SGVpZ2h0ID0gbnVsbDsNCiAgICB9IGVsc2Ugew0KICAgICAgcGFuZWwuc3R5bGUubWF4SGVpZ2h0ID0gcGFuZWwuc2Nyb2xsSGVpZ2h0ICsgInB4IjsNCiAgICB9IA0KICB9KTsNCn0NCjwvc2NyaXB0Pg0KDQoNCg0KDQo=