$location->{address_components}[0]{types}[0]
   = "street_number"; #d3

$location->{address_components}[5]{short_name}
  = "CH"; #d2

$location->{geometry}{location_type}
 = "ROOFTOP"; #d1