List(List((a1*f2Au*f2Bu*g2Au*g2Bu*kt)/2.,0,0),
  List(0,(a1*f2Av*f2Bv*g2Av*g2Bv*kt)/2.,0),
  List(0,0,(a1*(f2Aw*f2Bw*g2Aw*g2Bw + 
        (4*f2Aw*f2Bw*g2Aweta*g2Bweta*kr)/(b2**2*kt))*kt)/2.))
