Binv(1,1) = COS(psiRad)
Binv(1,2) = -SIN(psiRad)
Binv(1,3) = 0. _d 0
Binv(2,1) = SIN(psiRad)
Binv(2,2) = COS(psiRad)
Binv(2,3) = 0. _d 0
Binv(3,1) = 0. _d 0
Binv(3,2) = 0. _d 0
Binv(3,3) = 1. _d 0
CB (iA,jA) = CB (iA,jA) + Cinv(iA,kA)*Binv(kA,jA)
_RL Ainv(3,3), Binv(3,3), Cinv(3,3), Dinv(3,3), CB(3,3)