sfcr_shock function

Create shock(s) to add to a sfcr_scenario().