added swirl.r