A <- length(Floats)-1;
B <- length(Floats);
C <- length(Floats)+1;
a <- Floats[A];
b <- Floats[B];