;;; This file automatically generated at 2006-08-01 03:15:15-0400 from
;;; ../2006/07/data-schema.scm

(list

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Entity")
 (lambda (node)
   (list
    (make-display-element
     "Entity"
     "ts:Entity"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Entity")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Person")
 (lambda (node)
   (list
    (make-display-element
     "Person"
     "ts:Person"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Person")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "name"
     "ts:name"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#name")
    (result->display-element (person:name node))))
 (lambda (node)
   (list
    (make-display-element
     "birthDate"
     "ts:birthDate"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#birthDate")
    (result->display-element (person:birth-date node))))
 (lambda (node)
   (list
    (make-display-element
     "homeAddress"
     "ts:homeAddress"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#homeAddress")
    (result->display-element (person:home-address node))))
 (lambda (node)
   (list
    (make-display-element
     "employment"
     "ts:employment"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#employment")
    (result->display-element (person:employment node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Official")
 (lambda (node)
   (list
    (make-display-element
     "Official"
     "ts:Official"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Official")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Subject")
 (lambda (node)
   (list
    (make-display-element
     "Subject"
     "ts:Subject"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Subject")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Suspect")
 (lambda (node)
   (list
    (make-display-element
     "Suspect"
     "ts:Suspect"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Suspect")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Victim")
 (lambda (node)
   (list
    (make-display-element
     "Victim"
     "ts:Victim"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Victim")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#PersonName")
 (lambda (node)
   (list
    (make-display-element
     "PersonName"
     "ts:PersonName"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#PersonName")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "personGivenName"
     "u:personGivenName"
     "http://niem.gov/niem/universal/0.3#personGivenName")
    (result->display-element (person-name:person-given-name node))))
 (lambda (node)
   (list
    (make-display-element
     "personMiddleName"
     "u:personMiddleName"
     "http://niem.gov/niem/universal/0.3#personMiddleName")
    (result->display-element (person-name:person-middle-name node))))
 (lambda (node)
   (list
    (make-display-element "personSurName"
                          "u:personSurName"
                          "http://niem.gov/niem/universal/0.3#personSurName")
    (result->display-element (person-name:person-sur-name node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Location")
 (lambda (node)
   (list
    (make-display-element
     "Location"
     "ts:Location"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Location")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "locationAddress"
     "u:locationAddress"
     "http://niem.gov/niem/universal/0.3#locationAddress")
    (result->display-element (location:location-address node))))
 (lambda (node)
   (list
    (make-display-element
     "locationCityName"
     "u:locationCityName"
     "http://niem.gov/niem/universal/0.3#locationCityName")
    (result->display-element (location:location-city-name node))))
 (lambda (node)
   (list
    (make-display-element
     "locationStateName"
     "u:locationStateName"
     "http://niem.gov/niem/universal/0.3#locationStateName")
    (result->display-element (location:location-state-name node))))
 (lambda (node)
   (list
    (make-display-element
     "locationPostalCodeID"
     "u:locationPostalCodeID"
     "http://niem.gov/niem/universal/0.3#locationPostalCodeID")
    (result->display-element (location:location-postal-codeid node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Organization")
 (lambda (node)
   (list
    (make-display-element
     "Organization"
     "ts:Organization"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Organization")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "partOf"
     "ts:partOf"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#partOf")
    (result->display-element (organization:part-of node))))
 (lambda (node)
   (list
    (make-display-element
     "address"
     "ts:address"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#address")
    (result->display-element (organization:address node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Office")
 (lambda (node)
   (list
    (make-display-element
     "Office"
     "ts:Office"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Office")
    (result->display-element node))))

(list
 (rdf-type-predicate "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Role")
 (lambda (node)
   (list
    (make-display-element
     "Role"
     "ts:Role"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Role")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "memberOf"
     "ts:memberOf"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#memberOf")
    (result->display-element (role:member-of node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#MembersOfCongress")
 (lambda (node)
   (list
    (make-display-element
     "MembersOfCongress"
     "ts:MembersOfCongress"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#MembersOfCongress")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#USRepresentatives")
 (lambda (node)
   (list
    (make-display-element
     "USRepresentatives"
     "ts:USRepresentatives"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#USRepresentatives")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#USSenators")
 (lambda (node)
   (list
    (make-display-element
     "USSenators"
     "ts:USSenators"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#USSenators")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Employment")
 (lambda (node)
   (list
    (make-display-element
     "Employment"
     "ts:Employment"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Employment")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "position"
     "ts:position"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#position")
    (result->display-element (employment:position node))))
 (lambda (node)
   (list
    (make-display-element
     "office"
     "ts:office"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#office")
    (result->display-element (employment:office node))))
 (lambda (node)
   (list
    (make-display-element
     "organization"
     "ts:organization"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#organization")
    (result->display-element (employment:organization node))))
 (lambda (node)
   (list
    (make-display-element
     "address"
     "ts:address"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#address")
    (result->display-element (employment:address node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Event")
 (lambda (node)
   (list
    (make-display-element
     "Event"
     "ts:Event"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Event")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "antecedent"
     "ts:antecedent"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#antecedent")
    (result->display-element (event:antecedent node))))
 (lambda (node)
   (list
    (make-display-element
     "time"
     "ts:time"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#time")
    (result->display-element (event:time node))))
 (lambda (node)
   (list
    (make-display-element
     "logOwner"
     "ts:logOwner"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#logOwner")
    (result->display-element (event:log-owner node))))
 (lambda (node)
   (list
    (make-display-element
     "subject"
     "ts:subject"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#subject")
    (result->display-element (event:subject node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Search")
 (lambda (node)
   (list
    (make-display-element
     "Search"
     "ts:Search"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Search")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "query"
     "ts:query"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#query")
    (result->display-element (search:query node))))
 (lambda (node)
   (list
    (make-display-element
     "result"
     "ts:result"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#result")
    (result->display-element (search:result node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#SearchResult")
 (lambda (node)
   (list
    (make-display-element
     "SearchResult"
     "ts:SearchResult"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#SearchResult")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Transfer")
 (lambda (node)
   (list
    (make-display-element
     "Transfer"
     "ts:Transfer"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Transfer")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "recipient"
     "ts:recipient"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#recipient")
    (result->display-element (transfer:recipient node))))
 (lambda (node)
   (list
    (make-display-element
     "sender"
     "ts:sender"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#sender")
    (result->display-element (transfer:sender node))))
 (lambda (node)
   (list
    (make-display-element
     "receiver"
     "ts:receiver"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#receiver")
    (result->display-element (transfer:receiver node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Assignment")
 (lambda (node)
   (list
    (make-display-element
     "Assignment"
     "ts:Assignment"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Assignment")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "assignee"
     "ts:assignee"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#assignee")
    (result->display-element (assignment:assignee node))))
 (lambda (node)
   (list
    (make-display-element
     "assigner"
     "ts:assigner"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#assigner")
    (result->display-element (assignment:assigner node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Database")
 (lambda (node)
   (list
    (make-display-element
     "Database"
     "ts:Database"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Database")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "owner"
     "ts:owner"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#owner")
    (result->display-element (database:owner node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataFlow")
 (lambda (node)
   (list
    (make-display-element
     "DataFlow"
     "ts:DataFlow"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataFlow")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "source"
     "ts:source"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#source")
    (result->display-element (data-flow:source node))))
 (lambda (node)
   (list
    (make-display-element
     "recipient"
     "ts:recipient"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#recipient")
    (result->display-element (data-flow:recipient node))))
 (lambda (node)
   (list
    (make-display-element
     "purpose"
     "ts:purpose"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#purpose")
    (result->display-element (data-flow:purpose node))))
 (lambda (node)
   (list
    (make-display-element
     "category"
     "ts:category"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#category")
    (result->display-element (data-flow:category node))))
 (lambda (node)
   (list
    (make-display-element
     "content"
     "ts:content"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#content")
    (result->display-element (data-flow:content node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataSource")
 (lambda (node)
   (list
    (make-display-element
     "DataSource"
     "ts:DataSource"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataSource")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataRecipient")
 (lambda (node)
   (list
    (make-display-element
     "DataRecipient"
     "ts:DataRecipient"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataRecipient")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#AuthorizedPurpose")
 (lambda (node)
   (list
    (make-display-element
     "AuthorizedPurpose"
     "ts:AuthorizedPurpose"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#AuthorizedPurpose")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "statute"
     "ts:statute"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#statute")
    (result->display-element (authorized-purpose:statute node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataCategory")
 (lambda (node)
   (list
    (make-display-element
     "DataCategory"
     "ts:DataCategory"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataCategory")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataRecord")
 (lambda (node)
   (list
    (make-display-element
     "DataRecord"
     "ts:DataRecord"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#DataRecord")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "source"
     "ts:source"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#source")
    (result->display-element (data-record:source node)))))

(list
 (rdf-type-predicate "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#SORN")
 (lambda (node)
   (list
    (make-display-element
     "SORN"
     "ts:SORN"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#SORN")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "sor"
     "ts:sor"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#sor")
    (result->display-element (sorn:sor node))))
 (lambda (node)
   (list
    (make-display-element
     "authority"
     "ts:authority"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#authority")
    (result->display-element (sorn:authority node))))
 (lambda (node)
   (list
    (make-display-element
     "routineUse"
     "ts:routineUse"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#routineUse")
    (result->display-element (sorn:routine-use node)))))

(list
 (rdf-type-predicate "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#SOR")
 (lambda (node)
   (list
    (make-display-element
     "SOR"
     "ts:SOR"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#SOR")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "notice"
     "ts:notice"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#notice")
    (result->display-element (sor:notice node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#LegalAuthority")
 (lambda (node)
   (list
    (make-display-element
     "LegalAuthority"
     "ts:LegalAuthority"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#LegalAuthority")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "statute"
     "ts:statute"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#statute")
    (result->display-element (legal-authority:statute node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#RoutineUse")
 (lambda (node)
   (list
    (make-display-element
     "RoutineUse"
     "ts:RoutineUse"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#RoutineUse")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CommercialDatabase")
 (lambda (node)
   (list
    (make-display-element
     "CommercialDatabase"
     "ts:CommercialDatabase"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CommercialDatabase")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#PassengerNameRecord")
 (lambda (node)
   (list
    (make-display-element
     "PassengerNameRecord"
     "ts:PassengerNameRecord"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#PassengerNameRecord")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "passenger"
     "ts:passenger"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#passenger")
    (result->display-element (passenger-name-record:passenger node))))
 (lambda (node)
   (list
    (make-display-element
     "flight"
     "ts:flight"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#flight")
    (result->display-element (passenger-name-record:flight node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Flight")
 (lambda (node)
   (list
    (make-display-element
     "Flight"
     "ts:Flight"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Flight")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "number"
     "ts:number"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#number")
    (result->display-element (flight:number node))))
 (lambda (node)
   (list
    (make-display-element
     "origin"
     "ts:origin"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#origin")
    (result->display-element (flight:origin node))))
 (lambda (node)
   (list
    (make-display-element
     "destination"
     "ts:destination"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#destination")
    (result->display-element (flight:destination node)))))

(list
 (rdf-type-predicate "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Case")
 (lambda (node)
   (list
    (make-display-element
     "Case"
     "ts:Case"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Case")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "agent"
     "ts:agent"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#agent")
    (result->display-element (case:agent node))))
 (lambda (node)
   (list
    (make-display-element "caseCategory"
                          "c:caseCategory"
                          "http://niem.gov/niem/common/0.3#caseCategory")
    (result->display-element (case:case-category node))))
 (lambda (node)
   (list
    (make-display-element "caseTrackingID"
                          "c:caseTrackingID"
                          "http://niem.gov/niem/common/0.3#caseTrackingID")
    (result->display-element (case:case-trackingid node))))
 (lambda (node)
   (list
    (make-display-element
     "isOpenedBy"
     "ts:isOpenedBy"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#isOpenedBy")
    (result->display-element (case:is-opened-by node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CaseOpening")
 (lambda (node)
   (list
    (make-display-element
     "CaseOpening"
     "ts:CaseOpening"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CaseOpening")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "opens"
     "ts:opens"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#opens")
    (result->display-element (case-opening:opens node)))))

(list
 (rdf-type-predicate "http://www.niem.gov/niem/domains/justice/0.3#Arrest")
 (lambda (node)
   (list
    (make-display-element
     "Arrest"
     "j:Arrest"
     "http://www.niem.gov/niem/domains/justice/0.3#Arrest")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "arrestWarrant"
     "j:arrestWarrant"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestWarrant")
    (result->display-element (arrest:arrest-warrant node))))
 (lambda (node)
   (list
    (make-display-element
     "arrestSubject"
     "j:arrestSubject"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestSubject")
    (result->display-element (arrest:arrest-subject node))))
 (lambda (node)
   (list
    (make-display-element
     "arrestSubjectRightsReadIndicator"
     "j:arrestSubjectRightsReadIndicator"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestSubjectRightsReadIndicator")
    (result->display-element
     (arrest:arrest-subject-rights-read-indicator node))))
 (lambda (node)
   (list
    (make-display-element
     "arrestOfficial"
     "j:arrestOfficial"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestOfficial")
    (result->display-element (arrest:arrest-official node))))
 (lambda (node)
   (list
    (make-display-element
     "arrestCharge"
     "j:arrestCharge"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestCharge")
    (result->display-element (arrest:arrest-charge node))))
 (lambda (node)
   (list
    (make-display-element
     "arrestLocation"
     "j:arrestLocation"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestLocation")
    (result->display-element (arrest:arrest-location node)))))

(list
 (rdf-type-predicate
  "http://www.niem.gov/niem/domains/justice/0.3#ArrestWarrant")
 (lambda (node)
   (list
    (make-display-element
     "ArrestWarrant"
     "j:ArrestWarrant"
     "http://www.niem.gov/niem/domains/justice/0.3#ArrestWarrant")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element "caseCategory"
                          "c:caseCategory"
                          "http://niem.gov/niem/common/0.3#caseCategory")
    (result->display-element (arrest-warrant:case-category node))))
 (lambda (node)
   (list
    (make-display-element
     "caseCourt"
     "j:caseCourt"
     "http://www.niem.gov/niem/domains/justice/0.3#caseCourt")
    (result->display-element (arrest-warrant:case-court node))))
 (lambda (node)
   (list
    (make-display-element "data"
                          "j:data"
                          "http://www.niem.gov/niem/domains/justice/0.3#data")
    (result->display-element (arrest-warrant:data node))))
 (lambda (node)
   (list
    (make-display-element
     "arrestSubject"
     "j:arrestSubject"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestSubject")
    (result->display-element (arrest-warrant:arrest-subject node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#WarrantIssue")
 (lambda (node)
   (list
    (make-display-element
     "WarrantIssue"
     "ts:WarrantIssue"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#WarrantIssue")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "arrestWarrant"
     "j:arrestWarrant"
     "http://www.niem.gov/niem/domains/justice/0.3#arrestWarrant")
    (result->display-element (warrant-issue:arrest-warrant node))))
 (lambda (node)
   (list
    (make-display-element
     "initiatingAttorney"
     "j:initiatingAttorney"
     "http://www.niem.gov/niem/domains/justice/0.3#initiatingAttorney")
    (result->display-element (warrant-issue:initiating-attorney node))))
 (lambda (node)
   (list
    (make-display-element
     "judge"
     "j:judge"
     "http://www.niem.gov/niem/domains/justice/0.3#judge")
    (result->display-element (warrant-issue:judge node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Statute")
 (lambda (node)
   (list
    (make-display-element
     "Statute"
     "ts:Statute"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Statute")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Activity")
 (lambda (node)
   (list
    (make-display-element
     "Activity"
     "ts:Activity"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Activity")
    (result->display-element node)))
 (lambda (node)
   (list
    (make-display-element
     "legalSystem"
     "ts:legalSystem"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#legalSystem")
    (result->display-element (activity:legal-system node)))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#GovernmentActivity")
 (lambda (node)
   (list
    (make-display-element
     "GovernmentActivity"
     "ts:GovernmentActivity"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#GovernmentActivity")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#LawEnforcement")
 (lambda (node)
   (list
    (make-display-element
     "LawEnforcement"
     "ts:LawEnforcement"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#LawEnforcement")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CriminalLawEnforcement")
 (lambda (node)
   (list
    (make-display-element
     "CriminalLawEnforcement"
     "ts:CriminalLawEnforcement"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CriminalLawEnforcement")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Intelligence")
 (lambda (node)
   (list
    (make-display-element
     "Intelligence"
     "ts:Intelligence"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#Intelligence")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CounterTerrorism")
 (lambda (node)
   (list
    (make-display-element
     "CounterTerrorism"
     "ts:CounterTerrorism"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CounterTerrorism")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CT-CriminalLawEnforcement")
 (lambda (node)
   (list
    (make-display-element
     "CT-CriminalLawEnforcement"
     "ts:CT-CriminalLawEnforcement"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CT-CriminalLawEnforcement")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CT-Intelligence")
 (lambda (node)
   (list
    (make-display-element
     "CT-Intelligence"
     "ts:CT-Intelligence"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#CT-Intelligence")
    (result->display-element node))))

(list
 (rdf-type-predicate
  "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#LegalSystem")
 (lambda (node)
   (list
    (make-display-element
     "LegalSystem"
     "ts:LegalSystem"
     "http://dig.csail.mit.edu/TAMI/2006/07/data-schema#LegalSystem")
    (result->display-element node))))

)