logical doGsing,doGYsing,doPsing,doPFsing
      common/pvrecurflags/doGsing,doGYsing,doPsing,doPFsing
!$omp threadprivate(/pvrecurflags/)