@@ -29,58 +29,6 @@ FOUR_C_NAMESPACE_OPEN
2929
3030 */
3131
32- /* ---------------------------------------------------------------------*
33- | Call the element to set all basic parameter |
34- *----------------------------------------------------------------------*/
35- void Discret::Elements::FluidType::pre_evaluate (Core::FE::Discretization& dis,
36- Teuchos::ParameterList& p, std::shared_ptr<Core::LinAlg::SparseOperator> systemmatrix1,
37- std::shared_ptr<Core::LinAlg::SparseOperator> systemmatrix2,
38- std::shared_ptr<Core::LinAlg::Vector<double >> systemvector1,
39- std::shared_ptr<Core::LinAlg::Vector<double >> systemvector2,
40- std::shared_ptr<Core::LinAlg::Vector<double >> systemvector3)
41- {
42- const auto action = Teuchos::getIntegralValue<FLD::Action>(p, " action" );
43-
44- if (action == FLD::set_general_fluid_parameter)
45- {
46- Discret::Elements::FluidEleParameterStd* fldpara =
47- Discret::Elements::FluidEleParameterStd::instance ();
48- fldpara->set_element_general_fluid_parameter (
49- p, Core::Communication::my_mpi_rank (dis.get_comm ()));
50- }
51- else if (action == FLD::set_time_parameter)
52- {
53- Discret::Elements::FluidEleParameterTimInt* fldpara =
54- Discret::Elements::FluidEleParameterTimInt::instance ();
55- fldpara->set_element_time_parameter (p);
56- }
57- else if (action == FLD::set_turbulence_parameter)
58- {
59- Discret::Elements::FluidEleParameterStd* fldpara =
60- Discret::Elements::FluidEleParameterStd::instance ();
61- fldpara->set_element_turbulence_parameters (p);
62- }
63- else if (action == FLD::set_loma_parameter)
64- {
65- Discret::Elements::FluidEleParameterStd* fldpara =
66- Discret::Elements::FluidEleParameterStd::instance ();
67- fldpara->set_element_loma_parameter (p);
68- }
69- else if (action == FLD::set_general_fluid_xfem_parameter)
70- {
71- Discret::Elements::FluidEleParameterXFEM* fldpara =
72- Discret::Elements::FluidEleParameterXFEM::instance ();
73-
74- fldpara->set_element_general_fluid_parameter (
75- p, Core::Communication::my_mpi_rank (dis.get_comm ()));
76- fldpara->set_element_turbulence_parameters (p);
77- fldpara->set_element_xfem_parameter (p, Core::Communication::my_mpi_rank (dis.get_comm ()));
78- }
79-
80- return ;
81- }
82-
83-
8432/* ----------------------------------------------------------------------*
8533| evaluate the element (public) g.bau 03/07|
8634*----------------------------------------------------------------------*/
@@ -644,14 +592,6 @@ int Discret::Elements::Fluid::evaluate(Teuchos::ParameterList& params,
644592 FOUR_C_THROW (" {} D elements does not support calculation of mean Cai" , nsd);
645593 }
646594 break ;
647- case FLD::set_mean_Cai:
648- {
649- // pointer to class FluidEleParameter
650- Discret::Elements::FluidEleParameterStd* fldpara =
651- Discret::Elements::FluidEleParameterStd::instance ();
652- fldpara->set_csgs_phi (params.get <double >(" meanCai" ));
653- }
654- break ;
655595 case FLD::calc_node_normal:
656596 {
657597 if (nsd == 3 )
@@ -722,16 +662,6 @@ int Discret::Elements::Fluid::evaluate(Teuchos::ParameterList& params,
722662 this , params, mat, discretization, lm, elemat1, elemat2, elevec1, elevec2, elevec3);
723663 break ;
724664 }
725- case FLD::set_general_fluid_parameter:
726- case FLD::set_time_parameter:
727- case FLD::set_turbulence_parameter:
728- case FLD::set_loma_parameter:
729- // case FLD::calc_adjoint_neumann: // this is done by the surface elements
730- break ;
731- // -----------------------------------------------------------------------
732- // adjoint implementation enabling time-integration schemes such as
733- // one-step-theta, BDF2, and generalized-alpha (n+alpha_F and n+1)
734- // -----------------------------------------------------------------------
735665 default :
736666 FOUR_C_THROW (" Unknown type of action '{}' for Fluid" , act);
737667 break ;
0 commit comments