init_flow_shear Subroutine