(load "../cph/v2/load")
(load "display-runtime")
(load "paragraphs")
(define arr (build-tami-argument 's3:arrest-1))
(define ppap paragraph-predicate-accessor-pairs)
(define jd (arrest:arrest-subject arr))
(define ny (arrest:arrest-location arr))