#MERGEMAP "pepys-diary-ontology.ltm" "ltm"
#MERGEMAP "pepys-diary-people.ltm" "ltm"
#MERGEMAP "pepys-diary-places.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"]
[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"]
[start  @"http://www.techquila.com/psi/events/#start"]
[start-after  @"http://www.techquila.com/psi/events/#start-after"]
[start-before  @"http://www.techquila.com/psi/events/#start-before"]
[end  @"http://www.techquila.com/psi/events/#end"]
[end-after  @"http://www.techquila.com/psi/events/#end-after"]
[end-before  @"http://www.techquila.com/psi/events/#end-before"]
[participation  @"http://www.techquila.com/psi/events/#participation"]
[office-holding-event  @"http://www.techquila.com/psi/events/#office-holding"]
[office-holder  @"http://www.techquila.com/psi/events/#office-holder"]
[office-held  @"http://www.techquila.com/psi/events/#office-held"]
[office  @"http://www.techquila.com/psi/organisation/#office"]
[office-conferer @"http://www.techquila.com/psi/organisation/#office-conferer"]
[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"]
[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"]
[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"]
[event-subject  @"http://www.techquila.com/psi/events/#event-subject"]
[subject  @"http://www.techquila.com/psi/events/#subject"]
[dining-event  @"http://www.techquila.com/psi/events/#dining-event"]
[guest  @"http://www.techquila.com/psi/events/#guest"]
[host   @"http://www.techquila.com/psi/events/#host"]
[diner  @"http://www.techquila.com/psi/events/#diner"]
[lm-ii  @"http://www.techquila.com/psi/pepys/references/#lm-ii"]
[walking   @"http://www.techquila.com/psi/events/#walking"]
[method-of-travel   @"http://www.techquila.com/psi/events/#method-of-travel"]
[method   @"http://www.techquila.com/psi/events/#method"]
[loan   @"http://www.techquila.com/psi/events/#loan"]
[description    @"http://www.techquila.com/psi/general/#description"]
[place  @"http://www.techquila.com/psi/events/#location"]
[participant  @"http://www.techquila.com/psi/events/#participant"]
[loan-event   @"http://www.techquila.com/psi/events/#loan-event"]
[lender   @"http://www.techquila.com/psi/events/#lender"]
[borrower   @"http://www.techquila.com/psi/events/#borrower"]
[illness   @"http://www.techquila.com/psi/events/#illness"]
[patient   @"http://www.techquila.com/psi/events/#patient"]

/* Imports from people */
[samuel-pepys  @"http://en.wikipedia.org/wiki/Samuel_Pepys"]
[john-pepys  @"http://www.pepysdiary.com/p/154.php"]
[sir-robert-bernard  @"http://www.pepysdiary.com/p/555.php"]
[lady-digby @"http://www.techquila.com/psi/pepys/people/#bernard-elizabeth"]
[lewis-phillips @"http://www.pepysdiary.com/p/2785.php"]
[john-simcotes  @"http://www.pepysdiary.com/p/2816.php"]
[john-davenport @"http://www.pepysdiary.com/p/2182.php"]
[jaspar-trice   @"http://www.techquila.com/psi/pepys/people/#trice-jaspar"]
[tom-trice      @"http://www.pepysdiary.com/p/2784.php"]
[mr-vinter      @"http://www.techquila.com/psi/pepys/people/#vinter"]
[robert-ethell  @"http://www.techquila.com/psi/pepys/people/#ethell-robert"]
[john-greene    @"http://www.techquila.com/psi/pepys/people/#greene-john"]
[richard-piggot @"http://www.pepysdiary.com/p/2814.php"]
[robert-pepys   @"http://www.pepysdiary.com/p/884.php"]



/* Imports from places */
[pepys-farm  @"http://www.pepysdiary.com/p/1768.php"]
[sturtlow  @"http://www.pepysdiary.com/p/2822.php"]
[offord  @"http://www.pepysdiary.com/p/2811.php"]
[brampton  @"http://www.techquila.com/psi/pepys/places/#brampton"]
[huntingdon @"http://www.pepysdiary.com/p/1670.php"]
[goody-gorums @"http://www.techquila.com/psi/pepys/places/#goody-gorhams"]
[mother-blank-tavern @"http://www.techquila.com/psi/pepys/places/huntingdon/#mother-blank-tavern"]

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

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

/* Yesterday */
[yesterday @"http://www.techquila.com/psi/date-time/?gDateTime=1661-07-29"]

[event-16610720-1 : visiting-event
  = "Samuel visits Sir Robert Bernard at Huntingdon (20th July 1661)";
    "16610720"]
occurs(event-16610720-1 : event, today : on)
participation( event-16610720-1 : event,
  samuel-pepys : visitor, 
  sir-robert-bernard : visited,
  huntingdon : place )

[event-16610720-2 : discussion
  = "Samuel, Sir Robert and Jaspar Trice disucss Robert Pepy's estate (20th July 1661)";
    "16610720-2"]
occurs(event-16610720-2 : event, event-16610720-1 : during)
participation( event-16610720-2 : event,
  samuel-pepys : interlocutor,
  jaspar-trice : interlocutor,
  sir-robert-bernard : interlocutor )
event-subject( event-16610720-2 : event,
  robert-pepys-estate : subject )


[event-16610720-3 : discussion
  = "Samuel and Sir Robert discuss the debt of Richard Piggot (20th July 1661)";
    "16610720-3"]
occurs(event-16610720-3 : event, event-16610720-1 : during)
participation( event-16610720-3 : event,
  samuel-pepys : interlocutor,
  sir-robert-bernard : interlocutor )
event-subject (event-16610720-3 : event, event-16610720-r1 : subject )
[event-16610720-r1 : loan-event = "Robert Pepys extends Richard Piggot a mortgage"]
participation ( event-16610720-r1 : event,
  robert-pepys : lender,
  richard-piggot : borrower,
  richard-piggots-debt : loan)

[event-16610720-4 : dining-event
  = "Samuel dines with Sir Robert and his wife (20th July 1661)";
    "16610720-4"]
occurs(event-16610720-4 : event, event-16610720-1 : during)
participation( event-16610720-4 : event,
  samuel-pepys : guest,
  sir-robert-bernard : host,
  lady-digby : host )
{lady-digby,description,[[A very good woman.]]} / samuel-pepys event-16610720-4

[event-16610720-5 : visiting-event
  = "Samuel visits Lewis Phillips (20th July 1661)"; "16610720-5"]
occurs(event-16610720-5 : event, today : on)
participation( event-16610720-5 : event,
  samuel-pepys : visitor,
  lewis-phillips : visited )

[event-16610720-6 : meeting-event
  = "Samuel meets with Dr. Simcotes and others (20th July 1661)"; "16610720-6"]
occurs(event-16610720-6 : event, today : on)
participation( event-16610720-6 : event,
  samuel-pepys : participant,
  john-simcotes : participant,
  mr-vinter : participant,
  robert-ethell : participant )

[event-16610720-7 : visiting-event
  = "Samuel and others visit the tavern (20th July 1661)"; "16610720-7"]
[today-9pm : date-time = "9pm, Saturday 20th July 1661"
  @"http://www.techquila.com/psi/date-time/?gDateTime=1661-06-10T21:00:00Z"]
occurs(event-16610720-7 : event, today : on,
  today-9pm : end-before)
participation( event-16610720-7 : event,
  samuel-pepys : visitor,
  john-davenport : visitor,
  lewis-phillips : visitor,
  jaspar-trice : visitor,
  mother-blank-tavern : place )

[event-16610720-8 : travelling-event 
  = "Samuel walks home from Huntingdon (20th July 1661)";
    "16610720-8"]
occurs(event-16610720-8 : event,
  today-9pm : start-after)
participation( event-16610720-8 : event,
  samuel-pepys : traveller )
route-taken( event-16610720-8 : journey,
  huntingdon : route-start,
  pepys-farm : route-end )
method-of-travel( event-16610720-8 : journey,
  walking : method )

[event-16610720-9 : visiting-event
  = "Samuel meets with his father and others at Goody Gorum's tavern. (20th July 1661)";"16610720-9"]
occurs(event-16610720-9 : event,
  today : on)
participation( event-16610720-9 : event,
  samuel-pepys : visitor,
  john-pepys   : visited,
  tom-trice    : visited,
  jaspar-trice : visited,
  john-greene  : visited,
  goody-gorums : place )

[pepys-swollen-hand : illness
  = "Samuel's left hand is swollen due to a sting (c. 20 July 1661)"]
occurs (pepys-swollen-hand : event,
  yesterday : start-before,
  today : end )
participation ( pepys-swollen-hand : event,
  samuel-pepys : patient )