modified procedure_setup