WOLFRAM

Wolfram Archive
Wolfram Programming Lab is a legacy product.
All the same functionality and features, including access to Programming Lab Explorations, are available with Wolfram|One.
Start programming now. »
Explorations Home › Intermediate › Compass Signpost Static Preview
Try it now »
(no sign-in required)

Compass Signpost

Show compass directions from where you are to other cities.

Run the code to find the distance from where you are to Paris. Try other cities:

SHOW/HIDE DETAILS

Type += to get a natural language input box, and type “Paris” in the box. Evaluate with + to get an exact, computable representation of Paris:

\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \\\ \"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.France-\ -"}, {"name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.UnitedStates-\ -"}, {"name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--"},\ {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.UnitedStates-\ -"}, {"name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.UnitedStates-\ -"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 1.268669`6.554893321481534, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)

Find the distance from here to Paris:

GeoDistance[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--"}\ , {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]

HIDE DETAILS
GeoDistance[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--"}\ , {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]

Find the direction from where you are to Paris. Try other cities:

SHOW/HIDE DETAILS

Get the direction to Paris:

GeoDirection[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--"}\ , {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]

The result is the angle clockwise from north.

HIDE DETAILS
GeoDirection[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--"}\ , {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]

Get the x-y coordinates of Paris relative to where you are:
 

Hint: type deg to get the degree symbol (°).

SHOW/HIDE DETAILS

GeoDistance and GeoDirection give the distance and direction you would need to travel from your present location to reach a given city.

To plot that path on a flat surface, you need to convert {distance,direction} coordinates to {x,y} coordinates. {distance,direction} coordinates are similar to {r,θ} polar coordinates, but the direction value goes the opposite angular direction and the zero is where 90° is in polar coordinates. Subtracting the direction from 90° gives the polar coordinate angle. Use CoordinateTransform to convert that into Cartesian {x,y} coordinates in miles:

CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)], 90 \[Degree] - GeoDirection[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada-\ -"}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]}]

Remove the units from the values with QuantityMagnitude:

QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada-\ -"}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)], 90 \[Degree] - GeoDirection[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.\ Canada--"}, { "name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.\ Wisconsin.UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]}]]

HIDE DETAILS
QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada-\ -"}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)], 90 \[Degree] - GeoDirection[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.\ Canada--"}, { "name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.\ Wisconsin.UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.364286`6.012987474538661, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]}]]

Draw lines from where you are to the locations of various other cities. Try other cities:

SHOW/HIDE DETAILS

This expression gives the {x,y} coordinates of Paris relative to your current position:

QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada-\ -"}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)], 90 \[Degree] - GeoDirection[Here, \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \ \\\"IleDeFrance\\\", \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.\ Canada--"}, { "name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.\ Wisconsin.UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]}]]

To get the {x,y} coordinates of more than one city, it’s easiest to turn that expression into a pure function. This expression has been cast in pure function form by replacing the occurrences of Paris with hash signs (#) and following it with an ampersand (&). Applying the function to Paris gives the same result as above:

QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]] &[\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--"}\ , {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]

Use Map (/@) to get the {x,y} coordinates of each city in a list:

QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.Michigan.\ UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \\\ \"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{56., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \ \\\"WesternCape\\\", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{75., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \ \\\"NewSouthWales\\\", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{76., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}

Draw a line from where you are now ({0,0}) to the coordinates of each city:

Graphics[Line[{{0, 0}, QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{56., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{75., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{76., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

HIDE DETAILS
Graphics[Line[{{0, 0}, QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{80., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{62., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{81., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

Label the cities with their names:

SHOW/HIDE DETAILS

Add the names of the cities to the graphic. To avoid having to repeat the lengthy {x,y} coordinate calculation, first factor it out of the expression with With:

Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, Line[{{0, 0}, pt}] ] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{56., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{75., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{76., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

Now you can easily add the Text primitive at the endpoint pt of the line:

Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[#, pt]} ] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{56., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{75., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{76., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

HIDE DETAILS
Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[#, pt]} ] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{80., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{62., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{81., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

Add the distances. Try other cities:

SHOW/HIDE DETAILS

Column formats a list of items as a column:

Column[{"Abc", 1.23}]

Use Column to add the distance underneath the city name:

Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[Column[{#, GeoDistance[Here, #]}], pt]} ] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{56., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{75., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{76., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

Make the city name bold so that it stands out:

Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[Column[{Style[#, Bold], GeoDistance[Here, #]}], pt]} ] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{47., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{56., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{75., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{76., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

HIDE DETAILS
Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[Column[{Style[#, Bold], GeoDistance[Here, #]}], pt]} ] & /@ {\!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "paris", Typeset`boxes$$ = TemplateBox[{"\"Paris\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Paris\"", ",", "\"IleDeFrance\"", ",", "\"France\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Paris\\\", \\\"IleDeFrance\\\", \ \\\"France\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "paris", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "5", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.paris-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.paris-_*AdministrativeDivision-"}, { "name" -> "Surname", "desc" -> "a surname", "input" -> "*C.paris-_*Surname-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.paris-_*GivenName-"}, { "name" -> "Person", "desc" -> "a person", "input" -> "*C.paris-_*Person-"}}}, { "type" -> "SubCategory", "word" -> "paris", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "14", "Values" -> {{ "name" -> "{Paris, IleDeFrance, France}", "desc" -> "Paris (France)", "input" -> "*DPClash.CityE.paris-_**Paris.IleDeFrance.\ France--"}, { "name" -> "{Paris, Illinois, UnitedStates}", "desc" -> "Paris (Illinois, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Illinois.\ UnitedStates--"}, { "name" -> "{Paris, Texas, UnitedStates}", "desc" -> "Paris (Texas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Texas.\ UnitedStates--"}, { "name" -> "{Paris, Kentucky, UnitedStates}", "desc" -> "Paris (Kentucky, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Kentucky.\ UnitedStates--"}, { "name" -> "{Paris, Tennessee, UnitedStates}", "desc" -> "Paris (Tennessee, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Tennessee.\ UnitedStates--"}, { "name" -> "{Paris, Ontario, Canada}", "desc" -> "Paris (Canada)", "input" -> "*DPClash.CityE.paris-_**Paris.Ontario.Canada--\ "}, {"name" -> "{Paris, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Wisconsin.\ UnitedStates--"}, { "name" -> "{Paris, Arkansas, UnitedStates}", "desc" -> "Paris (Arkansas, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Arkansas.\ UnitedStates--"}, { "name" -> "{Paris, NewYork, UnitedStates}", "desc" -> "Paris (New York, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.NewYork.\ UnitedStates--"}, { "name" -> "{Paris, Missouri, UnitedStates}", "desc" -> "Paris (Missouri, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Missouri.\ UnitedStates--"}, { "name" -> "{Paris, Maine, UnitedStates}", "desc" -> "Paris (Maine, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Maine.\ UnitedStates--"}, { "name" -> "{ParisGrant, Wisconsin, UnitedStates}", "desc" -> "Paris (Wisconsin, USA)", "input" -> "*DPClash.CityE.paris-_**ParisGrant.Wisconsin.\ UnitedStates--"}, { "name" -> "{ParisTownship, Michigan, UnitedStates}", "desc" -> "Paris Township (Michigan, USA)", "input" -> "*DPClash.CityE.paris-_**ParisTownship.\ Michigan.UnitedStates--"}, { "name" -> "{Paris, Idaho, UnitedStates}", "desc" -> "Paris (Idaho, USA)", "input" -> "*DPClash.CityE.paris-_**Paris.Idaho.\ UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.88183`6.3969298630065, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{49., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "beijing", Typeset`boxes$$ = TemplateBox[{"\"Beijing\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Beijing\"", ",", "\"Beijing\"", ",", "\"China\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Beijing\\\", \\\"Beijing\\\", \ \\\"China\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "beijing", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "3", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.beijing-_*City-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.beijing-_*AdministrativeDivision-"}, { "name" -> "TranslationData", "desc" -> " referring to translations", "input" -> "*C.beijing-_*TranslationData-"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.355618`6.002528728648002, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{59., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "cape town", Typeset`boxes$$ = TemplateBox[{"\"Cape Town\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"CapeTown\"", ",", "\"WesternCape\"", ",", "\"SouthAfrica\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"CapeTown\\\", \\\"WesternCape\\\ \", \\\"SouthAfrica\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.303887`5.9342571152638905, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{80., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "sydney", Typeset`boxes$$ = TemplateBox[{"\"Sydney\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Sydney\"", ",", "\"NewSouthWales\"", ",", "\"Australia\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Sydney\\\", \\\"NewSouthWales\\\ \", \\\"Australia\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "Clash", "word" -> "sydney", "template" -> "Assuming \"${word}\" is ${desc1}. Use as \ ${desc2} instead", "count" -> "4", "Values" -> {{ "name" -> "City", "desc" -> "a city", "input" -> "*C.sydney-_*City-"}, { "name" -> "GivenName", "desc" -> "a given name", "input" -> "*C.sydney-_*GivenName-"}, { "name" -> "AdministrativeDivision", "desc" -> "an administrative division", "input" -> "*C.sydney-_*AdministrativeDivision-"}, { "name" -> "TelevisionProgram", "desc" -> "a television series", "input" -> "*C.sydney-_*TelevisionProgram-"}}}, { "type" -> "SubCategory", "word" -> "sydney", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Sydney, NewSouthWales, Australia}", "desc" -> "Sydney (Australia)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NewSouthWales.\ Australia--"}, { "name" -> "{Sydney, NovaScotia, Canada}", "desc" -> "Sydney (Canada)", "input" -> "*DPClash.CityE.sydney-_**Sydney.NovaScotia.\ Canada--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.295173`5.921621622774037, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{62., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\), \!\(\* NamespaceBox["LinguisticAssistant", DynamicModuleBox[{Typeset`query$$ = "vancouver", Typeset`boxes$$ = TemplateBox[{"\"Vancouver\"", RowBox[{"Entity", "[", RowBox[{"\"City\"", ",", RowBox[{"{", RowBox[{"\"Vancouver\"", ",", "\"BritishColumbia\"", ",", "\"Canada\""}], "}"}]}], "]"}], "\"Entity[\\\"City\\\", {\\\"Vancouver\\\", \ \\\"BritishColumbia\\\", \\\"Canada\\\"}]\"", "\"city\""}, "Entity"], Typeset`allassumptions$$ = {{ "type" -> "SubCategory", "word" -> "vancouver", "template" -> "Assuming ${desc1}. Use ${desc2} instead", "count" -> "2", "Values" -> {{ "name" -> "{Vancouver, BritishColumbia, Canada}", "desc" -> "Vancouver (Canada)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ BritishColumbia.Canada--"}, { "name" -> "{Vancouver, Washington, UnitedStates}", "desc" -> "Vancouver (United States)", "input" -> "*DPClash.CityE.vancouver-_**Vancouver.\ Washington.UnitedStates--"}}}}, Typeset`assumptions$$ = {}, Typeset`open$$ = {1}, Typeset`querystate$$ = { "Online" -> True, "Allowed" -> True, "mparse.jsp" -> 0.219508`5.792995346286154, "Messages" -> {}}}, DynamicBox[ToBoxes[ AlphaIntegration`LinguisticAssistantBoxes["", 4, Automatic, Dynamic[Typeset`query$$], Dynamic[Typeset`boxes$$], Dynamic[Typeset`allassumptions$$], Dynamic[Typeset`assumptions$$], Dynamic[Typeset`open$$], Dynamic[Typeset`querystate$$]], StandardForm], ImageSizeCache->{81., {7., 16.}}, TrackedSymbols:>{ Typeset`query$$, Typeset`boxes$$, Typeset`allassumptions$$, Typeset`assumptions$$, Typeset`open$$, Typeset`querystate$$}], DynamicModuleValues:>{}, UndoTrackedVariables:>{Typeset`open$$}], BaseStyle->{"Deploy"}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)}]

Share It—Make a website that shows distances from your location to various cities:

SHOW/HIDE DETAILS

Deploy a form that asks for a list of cities and makes a diagram of distances to them:

CloudDeploy[ FormFunction[{{"cities", "cities (city1; city2; ...)"} -> DelimitedSequence["City"]}, Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[Column[{Style[#, Bold], GeoDistance[Here, #]}], pt]} ] & /@ #cities] &, "PNG" ], Permissions -> "Public" ]

Click the link in the output to visit the site. Separate the cities you enter with semicolons (;) rather than spaces or commas, since both of those can occur in city names.

Tell the world about your creation by sharing the link via email, tweet, or other message.

HIDE DETAILS
CloudDeploy[ FormFunction[{{"cities", "cities (city1; city2; ...)"} -> DelimitedSequence["City"]}, Graphics[With[{pt = QuantityMagnitude[ CoordinateTransform[ "Polar" -> "Cartesian", {GeoDistance[Here, #], 90 \[Degree] - GeoDirection[Here, #]}]]}, {Line[{{0, 0}, pt}], Text[Column[{Style[#, Bold], GeoDistance[Here, #]}], pt]} ] & /@ #cities] &, "PNG" ], Permissions -> "Public" ]
Start programming now (no sign-in required)

Available for cloud, desktop and mobile