#MERGEMAP "pepys-diary-ontology.ltm" "ltm"
#MERGEMAP "pepys-diary-people.ltm" "ltm"
#MERGEMAP "pepys-diary-places.ltm" "ltm"
#MERGEMAP "pepys-diary-dates.ltm" "ltm"

/* Imports from core ontology */
[event @"http://www.techquila.com/psi/events/#event"]
[participation @"http://www.techquila.com/psi/events/#participation"]
[date @"http://www.techquila.com/psi/temporal/#date"]
[date-time @"http://www.techquila.com/psi/temporal/#date-time"]
[diary-entry @"http://www.techquila.com/psi/pepys/#diary-entry"]
[occurs @"http://www.techquila.com/psi/events/#occurs"]
[on @"http://www.techquila.com/psi/events/#date-time-of-occurrence"]
[start @"http://www.techquila.com/psi/events/#start"]
[start-before @"http://www.techquila.com/psi/events/#start-before"]
[start-after  @"http://www.techquila.com/psi/events/#start-after"]
[end   @"http://www.techquila.com/psi/events/#end"]
[deceased @"http://www.techquila.com/psi/events/#deceased"]
[death    @"http://www.techquila.com/psi/family/#death"]
[discussion @"http://www.techquila.com/psi/events/#discussion"]
[interlocutor @"http://www.techquila.com/psi/events/#interlocutor"]
[event-subject @"http://www.techquila.com/psi/events/#event-subject"]
[subject @"http://www.techquila.com/psi/events/#subject"]
[purchasing-event @"http://www.techquila.com/psi/events/#purchasing-event"]
[purchaser @"http://www.techquila.com/psi/events/#purchaser"]
[purchased @"http://www.techquila.com/psi/events/#purchased"]
[item  @"http://www.techquila.com/psi/pepys/#item"]
[travelling-event @"http://www.techquila.com/psi/events/#travelling"]
[route-taken @"http://www.techquila.com/psi/events/#route"]
[journey @"http://www.techquila.com/psi/events/#journey"]
[from @"http://www.techquila.com/psi/events/#route-start"]
[to   @"http://www.techquila.com/psi/events/#route-end"]
[traveller @"http://www.techquila.com/psi/events/#traveller"]
[place @"http://www.techquila.com/psi/events/#location"]
[cause-result  @"http://www.techquila.com/psi/events/#cause-result"]
[cause  @"http://www.techquila.com/psi/events/#cause"]
[result @"http://www.techquila.com/psi/events/#result"]
[news-event   @"http://www.techquila.com/psi/events/#news"]
[recipient   @"http://www.techquila.com/psi/pepys/#recipient"]


/* Imports from people */
[samuel-pepys @"http://en.wikipedia.org/wiki/Samuel_Pepys"]
[william-wight @"http://www.pepysdiary.com/p/911.php"]
[lady-jemima-montagu @"http://www.pepysdiary.com/p/115.php"]
[robert-pepys @"http://www.pepysdiary.com/p/884.php"]
[robert-pepys-illness   @"http://www.techquila.com/psi/pepys/people/#robert-pepys-illness"]

/* Imports from places */
[st-martins @"http://www.pepysdiary.com/p/964.php"]
[pepys-farm @"http://www.pepysdiary.com/p/1768.php"]
[post-house @"http://www.pepysdiary.com/p/2767.php"]
[seething-lane-house   @"http://www.pepysdiary.com/p/1023.php"]

/* Today's date and diary entry */
[today : date = "Saturday 6th July 1661"; "16610706" / diary-entry
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-07-16"]
{today, diary-entry, "http://www.pepysdiary.com/archive/1661/07/06/index.php"}
[yesterday  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-07-15"]

[event-16610705-r01 : death
  = "Death of Robert Pepys"; "16610705-r01"]
participation( event-16610705-r01 : event,
  robert-pepys : deceased )
occurs(event-16610705-r01 : event,
  yesterday : on)
cause-result ( event-16610705-r01 : result, robert-pepys-illness : cause )

[event-16610706-00 : news-event
  = "Samuel receives news of his Uncle Robert's death (6th July 1661)";"16610706-00"]
occurs(event-16610706-00 : event, today : on)
participation( event-16610706-00 : event,
  samuel-pepys  : recipient,
  seething-lane-house : place )
event-subject( event-16610706-00 : event,
  event-16610705-r01 : subject)


[event-16610706-01 : discussion 
  = "Samuel Pepys tells William Wight of Robert Pepys death (6th July 1661)";
    "16610706-01"]
occurs(event-16610706-01 : event, today : on)
participation( event-16610706-01 : event,
  william-wight : interlocutor,
  samuel-pepys  : interlocutor)
event-subject( event-16610706-01 : event,
  event-16610705-r01 : subject)


[event-16610706-02 : discussion 
  = "Samuel Pepys tells Lady Jemima Montagu of Robert Pepys death (6th July 1661)";
    "16610706-02"]
occurs(event-16610706-02 : event, today : on)
participation( event-16610706-02 : event,
  lady-jemima-montagu : interlocutor,
  samuel-pepys  : interlocutor)
event-subject( event-16610706-02 : event,
  event-16610705-r01 : subject)

[event-16610706-03 : purchasing-event
  = "Samuel buys new boots (6th July 1661)"; "16610706-03"]
occurs(event-16610706-03 : event, today : on)
participation( event-16610706-03 : event,
  samuel-pepys : purchaser,
  boots : purchased,
  st-martins : place)
[boots : item = "A pair of boots"]

[event-16610706-04 : travelling-event
  = "Samuel travels to Brampton (6th July 1661)"; "16610706-04"]
[event-16610706-04-start : date-time
  = "11am, Saturday 16th July 1661"; "16610706T11:00"
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-06-06T11:00"]
[event-16610706-04-start-latest : date-time
  = "Midday, Saturday 16th July 1661"; "16610706T12:00"
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-06-06T12:00"]
[event-16610706-04-end : date-time
  = "9pm, Saturday 16th July 1661"; "16610706T21:00"
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-06-06T21:00"]
occurs(event-16610706-04 : event, 
  event-16610706-04-start : start-after,
  event-16610706-04-start-latest : start-before,
  event-16610706-04-end   : end)
participation(event-16610706-04 : event, samuel-pepys : traveller)
route-taken( event-16610706-04 : journey, post-house : from,  pepys-farm : to)