wS_Tile = wS_Tile
wS_Tile = wS_Tile + vS_Mean
wS_Mean = wS_Mean + wS_Tile
_RL areaTile, wT_Tile, wS_Tile, wH_Tile, th2peTile
wS_Tile = 0.