<> a . @prefix log: . @prefix str: . @prefix : . @forAll :txt, :txt2, :pg2, :cname, :fname, :pname, :where, :city, :pat, :who, :lat, :lon. @prefix c: . @prefix foaf: . @prefix map: . :w3t c:mailbox ; :hasMembersIn [ :countryName "France" ], [ :countryName "United States" ], [ :countryName "Japan" ], [ :countryName "Netherlands" ], [ :countryName "Australia" ], [ :countryName "Canada" ] . { [ c:mailbox ] :hasMembersIn :where. :where :countryName :cname. log:content :txt. ( "" :cname "<" ) str:concatenation :pat. (:txt :pat ) str:scrape :fname. ( "http://www.un.org/Depts/unsd/demog/" :fname ) str:concatenation [ is log:uri of :pg2]. } log:implies { :where :UNcitiesPage :pg2 }. :Nice :cityName "Nice"; :suburb [ :cityName "Sophia", "Sophia Antipolis" ]. :Boston :cityName "Boston"; :suburb [ :cityName "Cambridge"]. :KC :cityName "KC", "Kansas City". { :who foaf:site [ is :cityName of :where ]. } log:implies { :who :worksNear :where }. { :who foaf:site :cname. } log:implies { :who :worksNear [ :cityName :cname] }. { :who :worksNear [ is :suburb of :where ] } log:implies { :who :worksNear :where }. { :who foaf:name :pname; :worksNear [ :cityName :cname]. [ :UNcitiesPage :pg2 ]. :pg2 log:content :txt. :txt str:contains :cname. ( "(" :cname "( \\(|<).*/TR>)" ) str:concatenation :pat. # @@very fragile! (:txt :pat) str:scrape :txt2. # 32.83-117.17 (:txt2 "]+>]+>(-?\\d+.\\d+)<.*]+>]+>(-?\\d+.\\d+)<") str:scrape :lon. } log:implies { [ a map:Marker; map:y :lat; map:x :lon; :_name :pname; :_pg :pg2; :_cityName :cname; ] }.