integer pvDitry(Ndd*Ndmax)
      common/pvDitry/pvDitry