squared r is added
corrected