complex(dp):: Cv(Ncc*Ncmax,-2:0)
      common/Cv/Cv
!$omp threadprivate(/Cv/)