List(List((a*kt*pAu*pBu*qAu*qBu)/2.,0,0),List(0,(a*kt*pAv*pBv*qAv*qBv)/2.,0),
  List(0,0,(a*kt*(pAw*pBw*qAw*qBw + (4*kr*pAw*pBw*qAweta*qBweta)/(bb**2*kt)))/
    2.))
