logical Qflag,Gflag,QandGflag
      common/flags/Qflag,Gflag,QandGflag