#MERGEMAP "pepys-diary-ontology.ltm" "ltm"
#MERGEMAP "pepys-diary-people.ltm" "ltm"
#MERGEMAP "pepys-diary-places.ltm" "ltm"
#MERGEMAP "pepys-diary-culture.ltm" "ltm"
#MERGEMAP "pepys-diary-artifacts.ltm" "ltm"

/* Imports from ontology */
[date                @"http://www.techquila.com/psi/temporal/#date"]
[diary-entry         @"http://www.techquila.com/psi/pepys/#diary-entry"]
[place               @"http://www.techquila.com/psi/events/#location"]
[participant         @"http://www.techquila.com/psi/events/#participant"]
[discussion          @"http://www.techquila.com/psi/events/#discussion"]
[on                  @"http://www.techquila.com/psi/events/#date-time-of-occurrence"]
[participation       @"http://www.techquila.com/psi/events/#participation"]
[interlocutor        @"http://www.techquila.com/psi/events/#interlocutor"]
[occurs              @"http://www.techquila.com/psi/events/#occurs"]
[event-subject       @"http://www.techquila.com/psi/events/#event-subject"]
[subject             @"http://www.techquila.com/psi/events/#subject"]
[visiting-event      @"http://www.techquila.com/psi/events/#visiting-event"]
[visitor             @"http://www.techquila.com/psi/events/#visitor"]
[visited             @"http://www.techquila.com/psi/events/#visited"]
[route-taken         @"http://www.techquila.com/psi/events/#route"]
[route-start         @"http://www.techquila.com/psi/events/#route-start"]
[route-end           @"http://www.techquila.com/psi/events/#route-end"]
[traveller           @"http://www.techquila.com/psi/events/#traveller"]
[travelling-event    @"http://www.techquila.com/psi/events/#travelling"]
[journey             @"http://www.techquila.com/psi/events/#journey"]
[meeting-event       @"http://www.techquila.com/psi/events/#meeting"]
[start-before        @"http://www.techquila.com/psi/events/#start-before"]
[event               @"http://www.techquila.com/psi/events/#event"]
[during              @"http://www.techquila.com/psi/events/relationships/#during"]
[dining-event        @"http://www.techquila.com/psi/events/#dining-event"]
[diner               @"http://www.techquila.com/psi/events/#diner"]
[description         @"http://www.techquila.com/psi/general/#description"]




/* Imports from people */
[samuel-pepys        @"http://en.wikipedia.org/wiki/Samuel_Pepys"]
[joseph-hill         @"http://www.pepysdiary.com/p/2842.php"]
[charles-ii          @"http://www.pepysdiary.com/p/344.php"]
[henry-moore         @"http://www.pepysdiary.com/p/340.php"]


/* Imports from places */
[popes-head-alley    @"http://www.pepysdiary.com/p/2843.php"]
[popes-head-tavern   @"http://www.techquila.com/psi/pepys/places/#popes-head-tavern"]
[seething-lane-house @"http://www.pepysdiary.com/p/1023.php"]
[navy-office         @"http://www.pepysdiary.com/p/483.php"]


/* Imports from culture */
[church-of-england   @"http://www.techquila.com/psi/pepys/culture/#church-of-england"]
[presbyterianism     @"http://www.pepysdiary.com/p/447.php"]
[parliament          @"http://www.pepysdiary.com/p/334.php"]
[city-of-london      @"http://www.pepysdiary.com/p/275.php"]


/* Imports from artifacts */
[robert-pepys-estate @"http://www.techquila.com/psi/pepys/subjects/#robert-pepys-estate"]


/* Today's date and diary entry */
[today : date = "Friday 26th July 1661";"16610726" / diary-entry
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-08-05"]
{today, diary-entry, "http://www.pepysdiary.com/archive/1661/07/26/index.php"}


/* Meeting Joseph Hill */
[event-16610726-01 : meeting-event 
  = "Samuel meets Mr. Hill in Popes Head Alley (26th July 1661)";"16610726-01"]
occurs(event-16610726-01 : event, today : on)
participation(event-16610726-01 : event,
  samuel-pepys : participant,
  joseph-hill : participant,
  popes-head-alley : place)

[event-16610726-02 : visiting-event
  = "Samuel and Mr. Hill go the Popes Head Tavern (26th July 1661)"; "16610726-02"]
occurs( event-16610726-02 : event, today : on)
participation(event-16610726-02 : event,
  samuel-pepys : visitor,
  joseph-hill : visitor,
  popes-head-tavern : place)

[event-16610726-03 : discussion
  = "Samuel has a discussion with Mr. Hill (26th July 1661)";"16610726-03"]
occurs( event-16610726-03 : event,
  event-16610726-02 : during )
participation( event-16610726-03 : event,
  samuel-pepys : interlocutor,
  joseph-hill : interlocutor)
event-subject( event-16610726-03 : event, church-of-england : subject)
event-subject( event-16610726-03 : event, charles-ii : subject)
event-subject( event-16610726-03 : event, presbyterianism : subject)
event-subject( event-16610726-03 : event, city-of-london : subject)
event-subject( event-16610726-03 : event, parliament : subject)

[event-16610726-04 : travelling-event
  = "Samuel travels home (26th July 1661)"; "16610726-04"]
participation( event-16610726-04 : event,
  samuel-pepys : traveller )
occurs( event-16610726-04 : event,
  today : on )
route-taken( event-16610726-04 : journey,
  popes-head-tavern : route-start,
  seething-lane-house : route-end )

/* Meeting Henry Moore */
[event-16610726-04 : meeting-event 
  = "Samuel meets Mr. Moore at his home (26th July 1661)";"16610726-04"]
occurs(event-16610726-04 : event, today : on)
participation(event-16610726-04 : event,
  samuel-pepys : participant,
  henry-moore : participant,
  seething-lane-house : place)

[event-16610726-05 : dining-event
  ="Samuel dines with Mr. Moore at an (unnamed) location (26th July 1661)";"16610726-05"]
occurs(event-16610726-05 : event, today : on)
participation(event-16610726-05 : event,
  samuel-pepys : diner,
  henry-moore : diner)

[event-16610726-06 : discussion
  = "Samuel discusses his uncle's will with Mr. Moore (26th July 1661)";"16610726-06"]
occurs( event-16610726-06 : event,
  event-16610726-05 : during )
participation( event-16610726-06 : event,
  samuel-pepys : interlocutor,
  henry-moore : interlocutor)
event-subject( event-16610726-06 : event, robert-pepys-estate : subject)
{robert-pepys-estate,description,[[(I) find more and more trouble like to attend it.]]} / samuel-pepys event-16610726-06

[event-16610726-07 : travelling-event
  = "Samuel travels to his office (26th July 1661)"; "16610726-07"]
participation( event-16610726-07 : event,
  samuel-pepys : traveller )
occurs( event-16610726-07 : event,
  today : on )
route-taken( event-16610726-07 : journey,
  navy-office : route-end )

[event-16610726-08 : travelling-event
  = "Samuel travels home again (26th July 1661)"; "16610726-08"]
participation( event-16610726-08 : event,
  samuel-pepys : traveller )
occurs( event-16610726-08 : event,
  today : on )
route-taken( event-16610726-08 : journey,
  navy-office : route-start,
  seething-lane-house : route-end  )