RueckAlt:=sRueck;

            Hvar:=rCycle /( 2.0 * rTmLag);

            Hvar:= (INV - RueckAlt) * Hvar / (1.0 + Hvar);

            OutvNew:=Hvar+RueckAlt;

            RueckDiff:=2.0 * Hvar + sRest;

            sRueck:=RueckDiff + RueckAlt;

            sRest:=RueckAlt - sRueck + RueckDiff;

这里有问题： 

           sRueck:=RueckDiff + RueckAlt;

            sRest:=RueckAlt - sRueck + RueckDiff;

从最后两行， 可以推出， sRest 恒等于0；