profIsInRunTime=1
profIsInRunTime=0
if ((.NOT.profilesDoGenGrid).AND.(profIsInRunTime.EQ.1)) then
if (profIsInRunTime.EQ.1) then
if ((prof_i.EQ.-10).OR.(prof_j.EQ.-10)) profIsInRunTime=0
integer tmpdate(4),tmpdiff(4),profIsInRunTime
elseif (profIsInRunTime.EQ.1) then
& .AND.(profIsInRunTime.EQ.1)) then