List(List((b1*f2Au*f2Bu*g2Au*g2Bu*kt)/2.,0,0),
  List(0,(b1*f2Av*f2Bv*g2Av*g2Bv*kt)/2.,0),
  List(0,0,(b1*(f2Aw*f2Bw*g2Aw*g2Bw + 
        (4*f2Awxi*f2Bwxi*g2Aw*g2Bw*kr)/(a2**2*kt))*kt)/2.))
