_RL theVar,theVarTile
theVarTile = 0.
theVarTile = theVarTile + tmpVol*tmpVal*tmpVal
theVar = theVar + theVarTile
theVarTile=0.
theVarTile=theVarTile+tmpVal*tmpVal
theVar=theVar+theVarTile