integer pvCitry(Ncc*Ncmax)
      common/pvCitry/pvCitry
!$omp threadprivate(/pvCitry/)