Update fel.geometric.R