      common a,c,d(10),j(3,3,3),b,k,f,e(3,3,3),i(10)
      common xx(600)
