Added loop routine for calc_tors_ang