An Unconditionally Stable, Energy-Preserving Finite Element Method with Adaptive Filtering for Geotactic Bioconvection