Files
MeanField/tests/operators/prepared_hydrostatic_equilibrium.cpp

335 lines
12 KiB
C++

#include <catch2/catch_test_macros.hpp>
#include <mfem.hpp>
import mean_field;
import test_helpers;
namespace prepared_hydrostatic_test_utils {
static mean_field::operators::context::hydrostatic::
HydrostaticEquilibriumDependencies
make_dependencies() {
return {
.discretization = {.identity = 211, .revision = 2},
.enthalpy = {.identity = 223, .revision = 3},
.gravityPotential = {.identity = 227, .revision = 5},
.displacement = {.identity = 229, .revision = 7},
.rotation = {.identity = 233, .revision = 11},
.bernoulliConstant = {.identity = 239, .revision = 13}
};
}
mean_field::operators::context::hydrostatic::HydrostaticEquilibriumStateView
make_state(
const mfem::Vector &enthalpy,
const mfem::Vector &gravityPotential,
const mfem::Vector &displacement,
const double bernoulliConstant
) {
return {
.enthalpy = enthalpy,
.gravityPotential = gravityPotential,
.displacement = displacement,
.bernoulliConstant = bernoulliConstant
};
}
mfem::Vector make_enthalpy(
const mean_field::fem::FEM &f,
const double phase = 0.19
) {
return gravity_prepared_test_utils::make_deterministic_vector(
f.enthalpyFes->GetTrueVSize(), phase
);
}
mfem::Vector make_gravity_potential(
const mean_field::fem::FEM &f,
const double phase = 0.37
) {
return gravity_prepared_test_utils::make_deterministic_vector(
f.gravityPotentialFes->GetTrueVSize(), phase
);
}
mean_field::physics::RigidRotation make_rotation(const double scale = 1.0) {
mfem::Vector angularVelocity(3);
angularVelocity(0) = 0.17 * scale;
angularVelocity(1) = -0.11 * scale;
angularVelocity(2) = 0.43 * scale;
mfem::Vector center(3);
center(0) = 0.037;
center(1) = -0.029;
center(2) = 0.021;
return mean_field::physics::RigidRotation(angularVelocity, center);
}
} // namespace prepared_hydrostatic_test_utils
TEST_CASE(
"Prepared Hydrostatic Residual Matches Stateless Kernel",
tags::barotrope &tags::hydro &tags::prepared &tags::residuals &tags::unit
) {
auto args = test_utils::setup_args();
mean_field::fem::FEM f =
mean_field::fem::setup_fem(args.mesh_file, args, 0);
mean_field::operators::PreparedHydrostaticEquilibriumOperator
preparedOperator(f, *f.domainMapperStateless);
const mfem::Vector enthalpy =
prepared_hydrostatic_test_utils::make_enthalpy(f);
const mfem::Vector gravityPotential =
prepared_hydrostatic_test_utils::make_gravity_potential(f);
const mfem::Vector displacement =
gravity_prepared_test_utils::make_displacement(f, 0.73);
constexpr double bernoulliConstant = 0.41;
const mean_field::physics::RigidRotation rotation =
prepared_hydrostatic_test_utils::make_rotation();
const auto dependencies =
prepared_hydrostatic_test_utils::make_dependencies();
CHECK_FALSE(preparedOperator.IsPrepared());
CHECK(preparedOperator.GetResidualPreparationCount() == 0);
CHECK(preparedOperator.GetResidualApplicationCount() == 0);
const auto report = preparedOperator.Prepare(
prepared_hydrostatic_test_utils::make_state(
enthalpy, gravityPotential, displacement, bernoulliConstant
),
dependencies, rotation
);
mfem::Vector preparedResidual;
mfem::Vector referenceResidual;
preparedOperator.BuildResidual(preparedResidual);
mean_field::operators::kernels::apply_hydrostatic_equilibrium(
f, *f.domainMapperStateless, rotation, enthalpy, gravityPotential,
displacement, bernoulliConstant, referenceResidual
);
const double relativeError = gravity_prepared_test_utils::relative_error(
preparedResidual, referenceResidual, f.mesh->GetComm()
);
INFO("Prepared hydrostatic residual relative error = " << relativeError);
const auto &statistics = preparedOperator.GetContextPreparationStatistics();
CHECK(preparedOperator.IsPrepared());
CHECK(report.contextReport.preparedStaticDependencies);
CHECK(report.contextReport.preparedGeometryState);
CHECK(report.contextReport.preparedRotationDependencies);
CHECK(report.contextReport.preparedBaseState);
CHECK(report.updatedRotation);
CHECK(report.preparedResidual);
CHECK(report.DidAnyWork());
CHECK(preparedOperator.GetStellarElementCount() > 0);
CHECK(statistics.staticPreparations == 1);
CHECK(statistics.geometryPreparations == 1);
CHECK(statistics.rotationPreparations == 1);
CHECK(statistics.baseStatePreparations == 1);
CHECK(preparedOperator.GetResidualPreparationCount() == 1);
CHECK(preparedOperator.GetResidualApplicationCount() == 1);
CHECK(relativeError < 2.0e-12);
}
TEST_CASE(
"Prepared Hydrostatic Residual Reuses And Selectively Rebuilds Data",
tags::barotrope &tags::hydro &tags::prepared &tags::residuals &tags::unit
) {
auto args = test_utils::setup_args();
mean_field::fem::FEM f =
mean_field::fem::setup_fem(args.mesh_file, args, 0);
mean_field::operators::PreparedHydrostaticEquilibriumOperator
preparedOperator(f, *f.domainMapperStateless);
mfem::Vector enthalpy = prepared_hydrostatic_test_utils::make_enthalpy(f);
mfem::Vector gravityPotential =
prepared_hydrostatic_test_utils::make_gravity_potential(f);
mfem::Vector displacement =
gravity_prepared_test_utils::make_displacement(f, 0.42);
double bernoulliConstant = 0.36;
const mfem::Vector initialEnthalpy(enthalpy);
const mfem::Vector initialGravityPotential(gravityPotential);
const mfem::Vector initialDisplacement(displacement);
const double initialBernoulliConstant = bernoulliConstant;
const mean_field::physics::RigidRotation initialRotation =
prepared_hydrostatic_test_utils::make_rotation(0.80);
const mean_field::physics::RigidRotation changedRotation =
prepared_hydrostatic_test_utils::make_rotation(1.25);
auto dependencies = prepared_hydrostatic_test_utils::make_dependencies();
preparedOperator.Prepare(
prepared_hydrostatic_test_utils::make_state(
enthalpy, gravityPotential, displacement, bernoulliConstant
),
dependencies, initialRotation
);
mfem::Vector initialResidual;
preparedOperator.BuildResidual(initialResidual);
enthalpy(0) += 0.29;
gravityPotential(0) -= 0.17;
displacement = gravity_prepared_test_utils::make_displacement(f, 0.73);
bernoulliConstant += 0.23;
const auto unchangedReport = preparedOperator.Prepare(
prepared_hydrostatic_test_utils::make_state(
enthalpy, gravityPotential, displacement, bernoulliConstant
),
dependencies, changedRotation
);
mfem::Vector unchangedResidual;
preparedOperator.BuildResidual(unchangedResidual);
CHECK_FALSE(unchangedReport.DidAnyWork());
CHECK_FALSE(unchangedReport.updatedRotation);
CHECK_FALSE(unchangedReport.preparedResidual);
CHECK(
gravity_prepared_test_utils::relative_error(
unchangedResidual, initialResidual, f.mesh->GetComm()
) == 0.0
);
CHECK(preparedOperator.GetResidualPreparationCount() == 1);
// Only the enthalpy stamp changes. The altered potential,
// displacement, constant, and rotation remain intentionally frozen.
++dependencies.enthalpy.revision;
const auto enthalpyReport = preparedOperator.Prepare(
prepared_hydrostatic_test_utils::make_state(
enthalpy, gravityPotential, displacement, bernoulliConstant
),
dependencies, changedRotation
);
mfem::Vector enthalpyResidual;
mfem::Vector enthalpyReference;
preparedOperator.BuildResidual(enthalpyResidual);
mean_field::operators::kernels::apply_hydrostatic_equilibrium(
f, *f.domainMapperStateless, initialRotation, enthalpy,
initialGravityPotential, initialDisplacement, initialBernoulliConstant,
enthalpyReference
);
CHECK_FALSE(enthalpyReport.contextReport.preparedStaticDependencies);
CHECK_FALSE(enthalpyReport.contextReport.preparedGeometryState);
CHECK_FALSE(enthalpyReport.contextReport.preparedRotationDependencies);
CHECK(enthalpyReport.contextReport.preparedBaseState);
CHECK_FALSE(enthalpyReport.updatedRotation);
CHECK(enthalpyReport.preparedResidual);
CHECK(
gravity_prepared_test_utils::relative_error(
enthalpyResidual, enthalpyReference, f.mesh->GetComm()
) < 2.0e-12
);
++dependencies.rotation.revision;
const auto rotationReport = preparedOperator.Prepare(
prepared_hydrostatic_test_utils::make_state(
enthalpy, gravityPotential, displacement, bernoulliConstant
),
dependencies, changedRotation
);
mfem::Vector rotationResidual;
mfem::Vector rotationReference;
preparedOperator.BuildResidual(rotationResidual);
mean_field::operators::kernels::apply_hydrostatic_equilibrium(
f, *f.domainMapperStateless, changedRotation, enthalpy,
initialGravityPotential, initialDisplacement, initialBernoulliConstant,
rotationReference
);
CHECK_FALSE(rotationReport.contextReport.preparedStaticDependencies);
CHECK_FALSE(rotationReport.contextReport.preparedGeometryState);
CHECK(rotationReport.contextReport.preparedRotationDependencies);
CHECK(rotationReport.contextReport.preparedBaseState);
CHECK(rotationReport.updatedRotation);
CHECK(rotationReport.preparedResidual);
CHECK(
gravity_prepared_test_utils::relative_error(
rotationResidual, rotationReference, f.mesh->GetComm()
) < 2.0e-12
);
++dependencies.displacement.revision;
const auto displacementReport = preparedOperator.Prepare(
prepared_hydrostatic_test_utils::make_state(
enthalpy, gravityPotential, displacement, bernoulliConstant
),
dependencies, changedRotation
);
mfem::Vector displacementResidual;
mfem::Vector displacementReference;
preparedOperator.BuildResidual(displacementResidual);
mean_field::operators::kernels::apply_hydrostatic_equilibrium(
f, *f.domainMapperStateless, changedRotation, enthalpy,
initialGravityPotential, displacement, initialBernoulliConstant,
displacementReference
);
CHECK_FALSE(displacementReport.contextReport.preparedStaticDependencies);
CHECK(displacementReport.contextReport.preparedGeometryState);
CHECK(displacementReport.contextReport.preparedRotationDependencies);
CHECK(displacementReport.contextReport.preparedBaseState);
CHECK_FALSE(displacementReport.updatedRotation);
CHECK(displacementReport.preparedResidual);
CHECK(
gravity_prepared_test_utils::relative_error(
displacementResidual, displacementReference, f.mesh->GetComm()
) < 2.0e-12
);
const auto &statistics = preparedOperator.GetContextPreparationStatistics();
CHECK(statistics.staticPreparations == 1);
CHECK(statistics.geometryPreparations == 2);
CHECK(statistics.rotationPreparations == 3);
CHECK(statistics.baseStatePreparations == 4);
CHECK(preparedOperator.GetResidualPreparationCount() == 4);
CHECK(preparedOperator.GetResidualApplicationCount() == 5);
const double displacementEffect =
gravity_prepared_test_utils::relative_error(
displacementResidual, rotationResidual, f.mesh->GetComm()
);
INFO("Residual change after displacement update = " << displacementEffect);
CHECK(displacementEffect > 1.0e-8);
}