mytime = starttime
& .AND. (myTime .NE. starttime)
& xx_gen_remo_slope*(mytime-starttime) ) )
myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5)
& hflux_exfremo_slope*(mytime-starttime) )
& sflux_exfremo_slope*(mytime-starttime) )
& genremove_slope*(mytime-starttime) )