fctile_drift = 0. _d 0
fctile_drift = fctile_drift
fcthread_drift = fcthread_drift + fctile_drift
objf_drift(bi,bj) = objf_drift(bi,bj) + fctile_drift
& fctile_drift
_RL fctile_drift