#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"]
[date-time  @"http://www.techquila.com/psi/temporal/#date-time"]
[event  @"http://www.techquila.com/psi/events/#event"]
[participation  @"http://www.techquila.com/psi/events/#participation"]
[participant  @"http://www.techquila.com/psi/events/#participant"]
[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"]
[during  @"http://www.techquila.com/psi/events/relationships/#during"]
[performance @"http://www.techquila.com/psi/events/#performance"]
[audience @"http://www.techquila.com/psi/events/#audience"]
[performer @"http://www.techquila.com/psi/events/#performer"]
[work @"http://psi.ontopia.net/literature/#work"]
[play = "Play" @"http://psi.ontopia.net/literature/#play"]
[performed-work   @"http://www.techquila.com/psi/art/#performed-work"]
[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"]
[meeting-event  @"http://www.techquila.com/psi/events/#meeting"]
[discussion  @"http://www.techquila.com/psi/events/#discussion"]
[interlocutor  @"http://www.techquila.com/psi/events/#interlocutor"]
[place  @"http://www.techquila.com/psi/events/#location"]
[event-subject  @"http://www.techquila.com/psi/events/#event-subject"]
[subject  @"http://www.techquila.com/psi/events/#subject"]
[note  @"http://www.techquila.com/psi/general/#note"]
[description  @"http://www.techquila.com/psi/general/#description"]
[contextual-mention   @"http://www.techquila.com/psi/events/#contextual-reference"]
[mentioned  @"http://www.techquila.com/psi/events/#mentioned"]
[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-penn  @"http://www.pepysdiary.com/p/619.php"]
[william-batten @"http://www.pepysdiary.com/p/619.php"]
[ann-mitchell   @"http://www.pepysdiary.com/p/1101.php"]
[barbara-palmer @"http://www.pepysdiary.com/p/1062.php"]
[mary-wight  @"http://www.pepysdiary.com/p/995.php"]
[thomas-pepys @"http://www.pepysdiary.com/p/2542.php"]
[william-wight   @"http://www.pepysdiary.com/p/911.php"]
[paulina-jackson  @"http://www.pepysdiary.com/p/1568.php"]


/* Imports from places */
[westminster-hall @"http://www.pepysdiary.com/p/128.php"]
[theatre-royal  @"http://www.pepysdiary.com/p/1611.php"]
[seething-lane-house  @"http://www.pepysdiary.com/p/1023.php"]


/* Imports from culture */
[kings-company  @"http://www.techquila.com/psi/pepys/people/#kings-company"]
[brennoralt     @"http://www.techquila.com/psi/culture/#brennoralt"]

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


/* Today's date and diary entry */
[today : date = "Tuesday 23rd July 1661";"16610723" / diary-entry
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-08-02"]
{today, diary-entry, "http://www.pepysdiary.com/archive/1661/07/23/index.php"}

[event-16610723-1 : visiting-event
  = "Samuel visits Sir William Penn (23rd July 1661)";"16610723-1"]
occurs(event-16610723-1 : event, today : on)
participation(event-16610723-1 : event,
  samuel-pepys : visitor,
  william-penn : visited)

[event-16610723-2 : visiting-event
  = "Samuel visits Sir William Batten (23rd July 1661)";"16610723-2"]
occurs(event-16610723-2 : event, today : on)
participation(event-16610723-2 : event,
  samuel-pepys : visitor,
  william-batten : visited)

[event-16610723-3 : visiting-event
  = "Samuel visits Westminster Hall (23rd July 1661)";"16610723-3"]
occurs(event-16610723-3 : event, today : on)
participation(event-16610723-3 : event,
  samuel-pepys : visitor,
  westminster-hall : place)

[event-16610723-4 : meeting-event 
  = "Samuel meets Ann Mitchell at Westminster Hall (23rd July 1661)"]
occurs(event-16610723-4 : event,
  event-16610723-3 : during)
participation(event-16610723-4 : event,
  samuel-pepys : participant,
  ann-mitchell : participant)


[event-16610723-5 : performance
  = "Performance of 'Brennoralt' (23rd July 1661)";"16610723-5"]
{event-16610723-5, description, [[It seemed a good play, but ill acted]]} / samuel-pepys
occurs(event-16610723-5 : event, today : on )
participation(event-16610723-5 : event,
  kings-company : performer,
  theatre-royal : place)
performed-work( event-16610723-5 : performance, brennoralt : work )
participation( event-16610723-5 : event,
  samuel-pepys : audience )
participation( event-16610723-5 : event, barbara-palmer : audience )

[event-16610723-6 : discussion 
  = "Samuel discusses Robert Pepys' estate with Thomas Pepys (23rd July 1661)";"16610723-6"]
occurs(event-16610723-6 : event, today : on)
participation( event-16610723-6 : event,
  samuel-pepys : interlocutor,
  thomas-pepys : interlocutor)
event-subject( event-16610723-6 : event, robert-pepys-estate : subject)

[event-16610723-7 : meeting-event
  = "Samuel meets with his aunt Mary Wight (23rd July 1661)";"16610723-7"]
{event-16610723-7, note, [[ The purpose of the visit was to see William Wight, but he was out: "So to my uncle Wight’s, but found him out of doors, but my aunt I saw and staid a while" ]]}
contextual-mention ( event-16610723-7 : event, william-wight : mentioned)
occurs(event-16610723-7 : event, today : on)
participation( event-16610723-7 : event,
  samuel-pepys : participant,
  mary-wight : participant)

[event-16610723-8 : news-event
  = "Samuel hears of his sister's idleness (23rd July 1661)";"16610723-8"]
occurs(event-16610723-8 : event, today : on)
participation( event-16610723-8 : event,
  samuel-pepys : recipient,
  seething-lane-house : place)
event-subject ( event-16610723-8 : event,
  paulina-jackson : subject )
{paulina-jackson,description,[[Troubled to hear how proud and idle Pall is grown, that I am resolved not to keep her]]} / samuel-pepys event-16610723-8