if { [catch {

    # Source Tcl libraries
    set script_dir [file dirname [info script]]
    source "${script_dir}/../../../etc/install/tcl/test-procs.tcl"
    source "${script_dir}/simulation-test-procs.tcl"
    source "${script_dir}/demo-data.tcl"

    ::twt::simulation::setup::users_and_groups

    ::twt::simulation::setup::citybuild_objects

    ::twt::simulation::setup::all_templates   

    ::twt::simulation::play::tilburg_template_user_1

    ::twt::simulation::test::permissions_all

} result] } {
    global errorInfo

    # Output error stack trace and HTML response body
    ::twt::log $result
    ::twt::log "*** Tcl TRACE ***"
    ::twt::log $errorInfo
    ::twt::log "The response body is: [response body]"

    error "Test failed: $result"
}