if (profilesDoGenGrid) then
logical profilesDoNcOutput, profilesDoGenGrid
& profilesDoGenGrid
IF ( profilesDoGenGrid ) THEN
IF ( (.NOT.profilesDoGenGrid).AND.
write(msgbuf,'(a,l5)') ' profilesDoGenGrid ',profilesDoGenGrid
if (.NOT.profilesDoGenGrid) then
profilesDoGenGrid=.true.
profilesDoGenGrid=.false.