source("RefreshStack.R");
if (B>1) {
Floats[B] <- a-b;
Floats <- Floats[-(A)];
}