{r*Vect[Derivative[1][a]], r*VP[Vect[n], Vect[Derivative[1][a]]], r*SP[Vect[a], Vect[n]]^2*Vect[n], r*SP[Vect[n], Vect[Derivative[1][a]]]*Vect[n], r*SP[Vect[a], Vect[a]]*Vect[n], r*SP[Vect[a], Vect[n]]*Vect[a], -(r*SP[Vect[a], Vect[n]]*VP[Vect[a], Vect[n]])}