Brethreton problem in square tube domain. More...

Inheritance diagram for ThreeDimBethertonProblem< ELEMENT >:

Public Member Functions
	ThreeDimBethertonProblem ()
	Constructor. More...

	~ThreeDimBethertonProblem ()
	Destructor to clean up memory. More...

void	fix_pressure (const unsigned int &e, const unsigned int &pdof, const double &pvalue)
	Fix pressure in element e at pressure dof pdof and set to pvalue. More...

void	actions_before_newton_convergence_check ()
	Remesh before any convergence checke. More...

double	get_outflow ()

double	get_lambda ()

void	multiply_aspect_ratio (const double factor, const bool &mult_width)

STSpineMesh< Hijacked< ELEMENT >, SpineSurfaceFluidInterfaceElement< ELEMENT > > *	mesh_pt ()

void	doc_solution (DocInfo &doc_info)
	Doc the solution. More...

Public Member Functions inherited from oomph::Problem
virtual void	debug_hook_fct (const unsigned &i)

void	set_analytic_dparameter (double *const &parameter_pt)

void	unset_analytic_dparameter (double *const &parameter_pt)

bool	is_dparameter_calculated_analytically (double *const &parameter_pt)

void	set_analytic_hessian_products ()

void	unset_analytic_hessian_products ()

bool	are_hessian_products_calculated_analytically ()

void	set_pinned_values_to_zero ()

bool	distributed () const

virtual void	actions_before_adapt ()

virtual void	actions_after_adapt ()
	Actions that are to be performed after a mesh adaptation. More...

OomphCommunicator *	communicator_pt ()
	access function to the oomph-lib communicator More...

const OomphCommunicator *	communicator_pt () const
	access function to the oomph-lib communicator, const version More...

	Problem ()

	Problem (const Problem &dummy)=delete
	Broken copy constructor. More...

void	operator= (const Problem &)=delete
	Broken assignment operator. More...

virtual	~Problem ()
	Virtual destructor to clean up memory. More...

Mesh *&	mesh_pt ()
	Return a pointer to the global mesh. More...

Mesh *const &	mesh_pt () const
	Return a pointer to the global mesh (const version) More...

Mesh *&	mesh_pt (const unsigned &imesh)

Mesh *const &	mesh_pt (const unsigned &imesh) const
	Return a pointer to the i-th submesh (const version) More...

unsigned	nsub_mesh () const
	Return number of submeshes. More...

unsigned	add_sub_mesh (Mesh *const &mesh_pt)

void	flush_sub_meshes ()

void	build_global_mesh ()

void	rebuild_global_mesh ()

LinearSolver *&	linear_solver_pt ()
	Return a pointer to the linear solver object. More...

LinearSolver *const &	linear_solver_pt () const
	Return a pointer to the linear solver object (const version) More...

LinearSolver *&	mass_matrix_solver_for_explicit_timestepper_pt ()

LinearSolver *	mass_matrix_solver_for_explicit_timestepper_pt () const

EigenSolver *&	eigen_solver_pt ()
	Return a pointer to the eigen solver object. More...

EigenSolver *const &	eigen_solver_pt () const
	Return a pointer to the eigen solver object (const version) More...

Time *&	time_pt ()
	Return a pointer to the global time object. More...

Time *	time_pt () const
	Return a pointer to the global time object (const version). More...

double &	time ()
	Return the current value of continuous time. More...

double	time () const
	Return the current value of continuous time (const version) More...

TimeStepper *&	time_stepper_pt ()

const TimeStepper *	time_stepper_pt () const

TimeStepper *&	time_stepper_pt (const unsigned &i)
	Return a pointer to the i-th timestepper. More...

ExplicitTimeStepper *&	explicit_time_stepper_pt ()
	Return a pointer to the explicit timestepper. More...

unsigned long	set_timestepper_for_all_data (TimeStepper *const &time_stepper_pt, const bool &preserve_existing_data=false)

virtual void	shift_time_values ()
	Shift all values along to prepare for next timestep. More...

AssemblyHandler *&	assembly_handler_pt ()
	Return a pointer to the assembly handler object. More...

AssemblyHandler *const &	assembly_handler_pt () const
	Return a pointer to the assembly handler object (const version) More...

double &	minimum_dt ()
	Access function to min timestep in adaptive timestepping. More...

double &	maximum_dt ()
	Access function to max timestep in adaptive timestepping. More...

unsigned &	max_newton_iterations ()
	Access function to max Newton iterations before giving up. More...

void	problem_is_nonlinear (const bool &prob_lin)
	Access function to Problem_is_nonlinear. More...

double &	max_residuals ()

bool &	time_adaptive_newton_crash_on_solve_fail ()
	Access function for Time_adaptive_newton_crash_on_solve_fail. More...

double &	newton_solver_tolerance ()

void	add_time_stepper_pt (TimeStepper *const &time_stepper_pt)

void	set_explicit_time_stepper_pt (ExplicitTimeStepper *const &explicit_time_stepper_pt)

void	initialise_dt (const double &dt)

void	initialise_dt (const Vector< double > &dt)

Data *&	global_data_pt (const unsigned &i)
	Return a pointer to the the i-th global data object. More...

void	add_global_data (Data *const &global_data_pt)

void	flush_global_data ()

LinearAlgebraDistribution *const &	dof_distribution_pt () const
	Return the pointer to the dof distribution (read-only) More...

unsigned long	ndof () const
	Return the number of dofs. More...

unsigned	ntime_stepper () const
	Return the number of time steppers. More...

unsigned	nglobal_data () const
	Return the number of global data values. More...

unsigned	self_test ()
	Self-test: Check meshes and global data. Return 0 for OK. More...

void	enable_store_local_dof_pt_in_elements ()

void	disable_store_local_dof_pt_in_elements ()

unsigned long	assign_eqn_numbers (const bool &assign_local_eqn_numbers=true)

void	describe_dofs (std::ostream &out= *(oomph_info.stream_pt())) const

void	enable_discontinuous_formulation ()

void	disable_discontinuous_formulation ()

void	get_dofs (DoubleVector &dofs) const

void	get_dofs (const unsigned &t, DoubleVector &dofs) const
	Return vector of the t'th history value of all dofs. More...

void	set_dofs (const DoubleVector &dofs)
	Set the values of the dofs. More...

void	set_dofs (const unsigned &t, DoubleVector &dofs)
	Set the history values of the dofs. More...

void	set_dofs (const unsigned &t, Vector< double * > &dof_pt)

void	add_to_dofs (const double &lambda, const DoubleVector &increment_dofs)
	Add lambda x incremenet_dofs[l] to the l-th dof. More...

double *	global_dof_pt (const unsigned &i)

double &	dof (const unsigned &i)
	i-th dof in the problem More...

double	dof (const unsigned &i) const
	i-th dof in the problem (const version) More...

double *&	dof_pt (const unsigned &i)
	Pointer to i-th dof in the problem. More...

double *	dof_pt (const unsigned &i) const
	Pointer to i-th dof in the problem (const version) More...

virtual void	get_inverse_mass_matrix_times_residuals (DoubleVector &Mres)

virtual void	get_dvaluesdt (DoubleVector &f)

virtual void	get_residuals (DoubleVector &residuals)
	Get the total residuals Vector for the problem. More...

virtual void	get_jacobian (DoubleVector &residuals, DenseDoubleMatrix &jacobian)

virtual void	get_jacobian (DoubleVector &residuals, CRDoubleMatrix &jacobian)

virtual void	get_jacobian (DoubleVector &residuals, CCDoubleMatrix &jacobian)

virtual void	get_jacobian (DoubleVector &residuals, SumOfMatrices &jacobian)

void	get_fd_jacobian (DoubleVector &residuals, DenseMatrix< double > &jacobian)
	Get the full Jacobian by finite differencing. More...

void	get_derivative_wrt_global_parameter (double *const &parameter_pt, DoubleVector &result)

void	get_hessian_vector_products (DoubleVectorWithHaloEntries const &Y, Vector< DoubleVectorWithHaloEntries > const &C, Vector< DoubleVectorWithHaloEntries > &product)

void	solve_eigenproblem (const unsigned &n_eval, Vector< std::complex< double >> &eigenvalue, Vector< DoubleVector > &eigenvector, const bool &steady=true)
	Solve the eigenproblem. More...

void	solve_eigenproblem (const unsigned &n_eval, Vector< std::complex< double >> &eigenvalue, const bool &steady=true)

virtual void	get_eigenproblem_matrices (CRDoubleMatrix &mass_matrix, CRDoubleMatrix &main_matrix, const double &shift=0.0)

void	assign_eigenvector_to_dofs (DoubleVector &eigenvector)
	Assign the eigenvector passed to the function to the dofs. More...

void	add_eigenvector_to_dofs (const double &epsilon, const DoubleVector &eigenvector)

void	store_current_dof_values ()
	Store the current values of the degrees of freedom. More...

void	restore_dof_values ()
	Restore the stored values of the degrees of freedom. More...

void	enable_jacobian_reuse ()

void	disable_jacobian_reuse ()
	Disable recycling of Jacobian in Newton iteration. More...

bool	jacobian_reuse_is_enabled ()
	Is recycling of Jacobian in Newton iteration enabled? More...

bool &	use_predictor_values_as_initial_guess ()

void	newton_solve ()
	Use Newton method to solve the problem. More...

void	enable_globally_convergent_newton_method ()
	enable globally convergent Newton method More...

void	disable_globally_convergent_newton_method ()
	disable globally convergent Newton method More...

void	newton_solve (unsigned const &max_adapt)

void	steady_newton_solve (unsigned const &max_adapt=0)

void	copy (Problem *orig_problem_pt)

virtual Problem *	make_copy ()

virtual void	read (std::ifstream &restart_file, bool &unsteady_restart)

virtual void	read (std::ifstream &restart_file)

virtual void	dump (std::ofstream &dump_file) const

void	dump (const std::string &dump_file_name) const

void	delete_all_external_storage ()

virtual void	symmetrise_eigenfunction_for_adaptive_pitchfork_tracking ()

double *	bifurcation_parameter_pt () const

void	get_bifurcation_eigenfunction (Vector< DoubleVector > &eigenfunction)

void	activate_fold_tracking (double *const &parameter_pt, const bool &block_solve=true)

void	activate_bifurcation_tracking (double *const &parameter_pt, const DoubleVector &eigenvector, const bool &block_solve=true)

void	activate_bifurcation_tracking (double *const &parameter_pt, const DoubleVector &eigenvector, const DoubleVector &normalisation, const bool &block_solve=true)

void	activate_pitchfork_tracking (double *const &parameter_pt, const DoubleVector &symmetry_vector, const bool &block_solve=true)

void	activate_hopf_tracking (double *const &parameter_pt, const bool &block_solve=true)

void	activate_hopf_tracking (double *const &parameter_pt, const double &omega, const DoubleVector &null_real, const DoubleVector &null_imag, const bool &block_solve=true)

void	deactivate_bifurcation_tracking ()

void	reset_assembly_handler_to_default ()
	Reset the system to the standard non-augemented state. More...

double	arc_length_step_solve (double *const &parameter_pt, const double &ds, const unsigned &max_adapt=0)

double	arc_length_step_solve (Data *const &data_pt, const unsigned &data_index, const double &ds, const unsigned &max_adapt=0)

void	reset_arc_length_parameters ()

int &	sign_of_jacobian ()

void	explicit_timestep (const double &dt, const bool &shift_values=true)
	Take an explicit timestep of size dt. More...

void	unsteady_newton_solve (const double &dt)

void	unsteady_newton_solve (const double &dt, const bool &shift_values)

void	unsteady_newton_solve (const double &dt, const unsigned &max_adapt, const bool &first, const bool &shift=true)

double	doubly_adaptive_unsteady_newton_solve (const double &dt, const double &epsilon, const unsigned &max_adapt, const bool &first, const bool &shift=true)

double	doubly_adaptive_unsteady_newton_solve (const double &dt, const double &epsilon, const unsigned &max_adapt, const unsigned &suppress_resolve_after_spatial_adapt_flag, const bool &first, const bool &shift=true)

double	adaptive_unsteady_newton_solve (const double &dt_desired, const double &epsilon)

double	adaptive_unsteady_newton_solve (const double &dt_desired, const double &epsilon, const bool &shift_values)

void	assign_initial_values_impulsive ()

void	assign_initial_values_impulsive (const double &dt)

void	calculate_predictions ()
	Calculate predictions. More...

void	enable_mass_matrix_reuse ()

void	disable_mass_matrix_reuse ()

bool	mass_matrix_reuse_is_enabled ()
	Return whether the mass matrix is being reused. More...

void	refine_uniformly (const Vector< unsigned > &nrefine_for_mesh)

void	refine_uniformly (const Vector< unsigned > &nrefine_for_mesh, DocInfo &doc_info)

void	refine_uniformly_and_prune (const Vector< unsigned > &nrefine_for_mesh)

void	refine_uniformly_and_prune (const Vector< unsigned > &nrefine_for_mesh, DocInfo &doc_info)

void	refine_uniformly (DocInfo &doc_info)

void	refine_uniformly_and_prune (DocInfo &doc_info)

void	refine_uniformly ()

void	refine_uniformly (const unsigned &i_mesh, DocInfo &doc_info)
	Do uniform refinement for submesh i_mesh with documentation. More...

void	refine_uniformly (const unsigned &i_mesh)
	Do uniform refinement for submesh i_mesh without documentation. More...

void	p_refine_uniformly (const Vector< unsigned > &nrefine_for_mesh)

void	p_refine_uniformly (const Vector< unsigned > &nrefine_for_mesh, DocInfo &doc_info)

void	p_refine_uniformly_and_prune (const Vector< unsigned > &nrefine_for_mesh)

void	p_refine_uniformly_and_prune (const Vector< unsigned > &nrefine_for_mesh, DocInfo &doc_info)

void	p_refine_uniformly (DocInfo &doc_info)

void	p_refine_uniformly_and_prune (DocInfo &doc_info)

void	p_refine_uniformly ()

void	p_refine_uniformly (const unsigned &i_mesh, DocInfo &doc_info)
	Do uniform p-refinement for submesh i_mesh with documentation. More...

void	p_refine_uniformly (const unsigned &i_mesh)
	Do uniform p-refinement for submesh i_mesh without documentation. More...

void	refine_selected_elements (const Vector< unsigned > &elements_to_be_refined)

void	refine_selected_elements (const Vector< RefineableElement * > &elements_to_be_refined_pt)

void	refine_selected_elements (const unsigned &i_mesh, const Vector< unsigned > &elements_to_be_refined)

void	refine_selected_elements (const unsigned &i_mesh, const Vector< RefineableElement * > &elements_to_be_refined_pt)

void	refine_selected_elements (const Vector< Vector< unsigned >> &elements_to_be_refined)

void	refine_selected_elements (const Vector< Vector< RefineableElement * >> &elements_to_be_refined_pt)

void	p_refine_selected_elements (const Vector< unsigned > &elements_to_be_refined)

void	p_refine_selected_elements (const Vector< PRefineableElement * > &elements_to_be_refined_pt)

void	p_refine_selected_elements (const unsigned &i_mesh, const Vector< unsigned > &elements_to_be_refined)

void	p_refine_selected_elements (const unsigned &i_mesh, const Vector< PRefineableElement * > &elements_to_be_refined_pt)

void	p_refine_selected_elements (const Vector< Vector< unsigned >> &elements_to_be_refined)

void	p_refine_selected_elements (const Vector< Vector< PRefineableElement * >> &elements_to_be_refined_pt)

unsigned	unrefine_uniformly ()

unsigned	unrefine_uniformly (const unsigned &i_mesh)

void	p_unrefine_uniformly (DocInfo &doc_info)

void	p_unrefine_uniformly (const unsigned &i_mesh, DocInfo &doc_info)
	Do uniform p-unrefinement for submesh i_mesh without documentation. More...

void	adapt (unsigned &n_refined, unsigned &n_unrefined)

void	adapt ()

void	p_adapt (unsigned &n_refined, unsigned &n_unrefined)

void	p_adapt ()

void	adapt_based_on_error_estimates (unsigned &n_refined, unsigned &n_unrefined, Vector< Vector< double >> &elemental_error)

void	adapt_based_on_error_estimates (Vector< Vector< double >> &elemental_error)

void	get_all_error_estimates (Vector< Vector< double >> &elemental_error)

void	doc_errors (DocInfo &doc_info)
	Get max and min error for all elements in submeshes. More...

void	doc_errors ()
	Get max and min error for all elements in submeshes. More...

void	enable_info_in_newton_solve ()

void	disable_info_in_newton_solve ()
	Disable the output of information when in the newton solver. More...

Public Member Functions inherited from oomph::ExplicitTimeSteppableObject
	ExplicitTimeSteppableObject ()
	Empty constructor. More...

	ExplicitTimeSteppableObject (const ExplicitTimeSteppableObject &)=delete
	Broken copy constructor. More...

void	operator= (const ExplicitTimeSteppableObject &)=delete
	Broken assignment operator. More...

virtual	~ExplicitTimeSteppableObject ()
	Empty destructor. More...

virtual void	actions_before_explicit_stage ()

virtual void	actions_after_explicit_stage ()

Public Attributes
double	Fixed_spine_height

Public Attributes inherited from oomph::Problem
bool	Shut_up_in_newton_solve

Private Attributes
Vector< FiniteElement * >	Inlet_traction_element_pt

Vector< FiniteElement * >	Outlet_traction_element_pt

Vector< FiniteElement * >	Interface_line_element_pt

FiniteElement *	Fix_spine_height_element_pt

Data *	Bubble_pressure_data_pt

ofstream	Trace_file
	Trace file. More...

Spine *	Trace_spine_r_h_top

Spine *	Trace_spine_r_h_middle

Spine *	Trace_spine_r_h_bottom

Spine *	Trace_spine_r_d_top

Spine *	Trace_spine_r_d_bottom

Additional Inherited Members
Public Types inherited from oomph::Problem
typedef void(*	SpatialErrorEstimatorFctPt) (Mesh *&mesh_pt, Vector< double > &elemental_error)
	Function pointer for spatial error estimator. More...

typedef void(*	SpatialErrorEstimatorWithDocFctPt) (Mesh *&mesh_pt, Vector< double > &elemental_error, DocInfo &doc_info)
	Function pointer for spatial error estimator with doc. More...

Static Public Attributes inherited from oomph::Problem
static bool	Suppress_warning_about_actions_before_read_unstructured_meshes

Protected Types inherited from oomph::Problem
enum	Assembly_method { Perform_assembly_using_vectors_of_pairs , Perform_assembly_using_two_vectors , Perform_assembly_using_maps , Perform_assembly_using_lists , Perform_assembly_using_two_arrays }
	Enumerated flags to determine which sparse assembly method is used. More...

Protected Member Functions inherited from oomph::Problem
unsigned	setup_element_count_per_dof ()

virtual void	sparse_assemble_row_or_column_compressed (Vector< int * > &column_or_row_index, Vector< int * > &row_or_column_start, Vector< double * > &value, Vector< unsigned > &nnz, Vector< double * > &residual, bool compressed_row_flag)

virtual void	actions_before_newton_solve ()

virtual void	actions_after_newton_solve ()

virtual void	actions_before_newton_step ()

virtual void	actions_after_newton_step ()

virtual void	actions_before_implicit_timestep ()

virtual void	actions_after_implicit_timestep ()

virtual void	actions_after_implicit_timestep_and_error_estimation ()

virtual void	actions_before_explicit_timestep ()
	Actions that should be performed before each explicit time step. More...

virtual void	actions_after_explicit_timestep ()
	Actions that should be performed after each explicit time step. More...

virtual void	actions_before_read_unstructured_meshes ()

virtual void	actions_after_read_unstructured_meshes ()

virtual void	actions_after_change_in_global_parameter (double *const &parameter_pt)

virtual void	actions_after_change_in_bifurcation_parameter ()

virtual void	actions_after_parameter_increase (double *const &parameter_pt)

double &	dof_derivative (const unsigned &i)

double &	dof_current (const unsigned &i)

virtual void	set_initial_condition ()

virtual double	global_temporal_error_norm ()

unsigned	newton_solve_continuation (double *const &parameter_pt)

unsigned	newton_solve_continuation (double *const &parameter_pt, DoubleVector &z)

void	calculate_continuation_derivatives (double *const &parameter_pt)

void	calculate_continuation_derivatives (const DoubleVector &z)

void	calculate_continuation_derivatives_fd (double *const &parameter_pt)

bool	does_pointer_correspond_to_problem_data (double *const &parameter_pt)

void	set_consistent_pinned_values_for_continuation ()

Protected Attributes inherited from oomph::Problem
Vector< Problem * >	Copy_of_problem_pt

std::map< double *, bool >	Calculate_dparameter_analytic

bool	Calculate_hessian_products_analytic

LinearAlgebraDistribution *	Dof_distribution_pt

Vector< double * >	Dof_pt
	Vector of pointers to dofs. More...

DoubleVectorWithHaloEntries	Element_count_per_dof

double	Relaxation_factor

double	Newton_solver_tolerance

unsigned	Max_newton_iterations
	Maximum number of Newton iterations. More...

unsigned	Nnewton_iter_taken

Vector< double >	Max_res
	Maximum residuals at start and after each newton iteration. More...

double	Max_residuals

bool	Time_adaptive_newton_crash_on_solve_fail

bool	Jacobian_reuse_is_enabled
	Is re-use of Jacobian in Newton iteration enabled? Default: false. More...

bool	Jacobian_has_been_computed

bool	Problem_is_nonlinear

bool	Pause_at_end_of_sparse_assembly

bool	Doc_time_in_distribute

unsigned	Sparse_assembly_method

unsigned	Sparse_assemble_with_arrays_initial_allocation

unsigned	Sparse_assemble_with_arrays_allocation_increment

Vector< Vector< unsigned > >	Sparse_assemble_with_arrays_previous_allocation

double	Numerical_zero_for_sparse_assembly

double	FD_step_used_in_get_hessian_vector_products

bool	Mass_matrix_reuse_is_enabled

bool	Mass_matrix_has_been_computed

bool	Discontinuous_element_formulation

double	Minimum_dt
	Minimum desired dt: if dt falls below this value, exit. More...

double	Maximum_dt
	Maximum desired dt. More...

double	DTSF_max_increase

double	DTSF_min_decrease

double	Minimum_dt_but_still_proceed

bool	Scale_arc_length
	Boolean to control whether arc-length should be scaled. More...

double	Desired_proportion_of_arc_length
	Proportion of the arc-length to taken by the parameter. More...

double	Theta_squared

int	Sign_of_jacobian
	Storage for the sign of the global Jacobian. More...

double	Continuation_direction

double	Parameter_derivative
	Storage for the derivative of the global parameter wrt arc-length. More...

double	Parameter_current
	Storage for the present value of the global parameter. More...

bool	Use_continuation_timestepper
	Boolean to control original or new storage of dof stuff. More...

unsigned	Dof_derivative_offset

unsigned	Dof_current_offset

Vector< double >	Dof_derivative
	Storage for the derivative of the problem variables wrt arc-length. More...

Vector< double >	Dof_current
	Storage for the present values of the variables. More...

double	Ds_current
	Storage for the current step value. More...

unsigned	Desired_newton_iterations_ds

double	Minimum_ds
	Minimum desired value of arc-length. More...

bool	Bifurcation_detection
	Boolean to control bifurcation detection via determinant of Jacobian. More...

bool	Bisect_to_find_bifurcation
	Boolean to control wheter bisection is used to located bifurcation. More...

bool	First_jacobian_sign_change
	Boolean to indicate whether a sign change has occured in the Jacobian. More...

bool	Arc_length_step_taken
	Boolean to indicate whether an arc-length step has been taken. More...

bool	Use_finite_differences_for_continuation_derivatives

OomphCommunicator *	Communicator_pt
	The communicator for this problem. More...

bool	Always_take_one_newton_step

double	Timestep_reduction_factor_after_nonconvergence

bool	Keep_temporal_error_below_tolerance

Static Protected Attributes inherited from oomph::Problem
static ContinuationStorageScheme	Continuation_time_stepper
	Storage for the single static continuation timestorage object. More...

Detailed Description

template<class ELEMENT>
class ThreeDimBethertonProblem< ELEMENT >

Brethreton problem in square tube domain.

///////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////

Constructor & Destructor Documentation

◆ ThreeDimBethertonProblem()

template<class ELEMENT >

ThreeDimBethertonProblem< ELEMENT >::ThreeDimBethertonProblem

Constructor.

Constructor for RectangularDrivenCavity problem.

 { 
  
  double alpha = Global_Physical_Variables::Alpha;
  double height = Global_Physical_Variables::Height;
  double length_tip =  Global_Physical_Variables::Length_tip;
  double length_liq =  Global_Physical_Variables::Length_liq;
  double length_can =  Global_Physical_Variables::Length_can;
  double radius =  Global_Physical_Variables::Radius;
  double rat_press =  Global_Physical_Variables::Rat_press;
  this->Max_residuals = 10.0;
  this->Max_newton_iterations = 15;
  
  unsigned  ncan = Global_Physical_Variables::Ncan;
  unsigned  ntip = Global_Physical_Variables::Ntip;
  unsigned  nliq = Global_Physical_Variables::Nliq;
  
 // Build and assign mesh
  Problem::mesh_pt() = new  
   STSpineMesh<Hijacked<ELEMENT>, SpineSurfaceFluidInterfaceElement<ELEMENT>  >
   (ncan,ntip,nliq, alpha,length_can,length_tip,length_liq,height,radius);
  
   cout<<"Nnodes boundary 5: "<<mesh_pt()->nboundary_node(5)<<endl;
   cout<<"Nnodes spines : "<<mesh_pt()->nspine()<<endl;
   
   // Complete the build of all elements so they are fully functional
   
   // Set the fixed spine element
   unsigned num_nodes = mesh_pt()->nnode();
   SpineNode* spinenode_fixed=0;
   
   //Look fot the spine
   for(unsigned inod = 0;inod< num_nodes;inod++)
    {
     SpineNode* spnd_pt = dynamic_cast<SpineNode*>(mesh_pt()->node_pt(inod));
     double height = Global_Physical_Variables::Height;
     double length_tip =  Global_Physical_Variables::Length_tip;
     double distance =
      sqrt(  (spnd_pt->x(0))* (spnd_pt->x(0)) + 
             (spnd_pt->x(1) + (length_tip * radius))* 
             (spnd_pt->x(1) + (length_tip*radius)) + 
             (spnd_pt->x(2) - height/2)* (spnd_pt->x(2) - height/2) );
     
     if(distance < 10E-8)
      {
       cout<<"Spine to be pinned found"<<endl;   
       spinenode_fixed = spnd_pt;
      }
    }
   
   //Create a fixed element using the central spine
   FixSpineHeightElement* fix_spine_element_pt = 
    new FixSpineHeightElement(spinenode_fixed);
   
   //Set the fixed spine height
   Fixed_spine_height = spinenode_fixed->spine_pt()->height();
   
   //Add the fixed height to it
   fix_spine_element_pt->height_pt() = &Fixed_spine_height;
   
   //Store the element in the problem
   Fix_spine_height_element_pt = fix_spine_element_pt;
  
   //Create a bubble presure data
   Bubble_pressure_data_pt = new Data(1);
   
   //Set values
   Bubble_pressure_data_pt->set_value(0,rat_press);
   
   //This will be global data
   add_global_data(Bubble_pressure_data_pt);
   
   //Set the pressure data
   fix_spine_element_pt->set_traded_pressure_data(Bubble_pressure_data_pt);
   
   //Add the Fixed element to the mesh
   mesh_pt()->add_element_pt(fix_spine_element_pt);
   
   cout<<"Bubble pressure "<<Bubble_pressure_data_pt->value(0)<<endl;
   
   //Find number of bulk elements in mesh
   unsigned n_bulk = mesh_pt()->nbulk();
   
   // Loop over the elements to set up element-specific 
   // things that cannot be handled by constructor
   for(unsigned e=0;e<n_bulk;e++)
    {
     // Upcast from GeneralisedElement to the present element
     Hijacked<ELEMENT>* el_pt = 
      dynamic_cast<Hijacked<ELEMENT>* >(mesh_pt()->bulk_element_pt(e));
     
     //Set the Reynolds number
     el_pt->re_pt() = &Global_Physical_Variables::Re;
     
     //Set the  ReInvFr number
     el_pt->re_invfr_pt() = &Global_Physical_Variables::ReInvFr;
     
     //Set the gravity
     el_pt->g_pt() = &Global_Physical_Variables::G;
  
     //Insist that shape derivatives are calculated by "full" finite
     //differences (which is the silent default)
     //el_pt->evaluate_shape_derivs_by_direct_fd();
    }
  
   
   //Find number of interface elements in mesh
   unsigned n_interface = mesh_pt()->ninterface_element();
   unsigned nhi = 0;
   
   for(unsigned e=0;e<n_interface;e++)
    {
     // Upcast from GeneralisedElement to the present element
     SpineSurfaceFluidInterfaceElement<ELEMENT>* el_pt = 
      dynamic_cast<SpineSurfaceFluidInterfaceElement<ELEMENT>*>
      (mesh_pt()->interface_element_pt(e));
     el_pt->ca_pt() =  &Global_Physical_Variables::Ca;
     
     // Set the external pressure data
     el_pt->set_external_pressure_data(Bubble_pressure_data_pt);
     
     // Quite inefficient way of Hijack the nodes
     unsigned nnodes = el_pt->nnode();
     for(unsigned i =0; i<nnodes;i++)
      {
       if( ( (el_pt->node_pt(i)->x(1)- length_can)*
             (el_pt->node_pt(i)->x(1)- length_can) )< 10E-10 )
        {
         el_pt->hijack_nodal_value(i,1);
         nhi++;
        }
      }
  
     //Insist that shape derivatives are calculated by "full" finite
     //differences (which is the silent default)
     //el_pt->evaluate_shape_derivs_by_direct_fd();
    }
   
   cout<<nhi<<" hijacked nodes at the surface elements."<<endl;
   
   
   //Create and set the inlet elements 
   unsigned long ninlet = mesh_pt()->nbulkinlet();
   for(unsigned long i = 0;i<ninlet;i++)
    {
     SpineElement<NavierStokesTractionElement<Hijacked<ELEMENT> > >* 
      inlet_element_pt = 
      new  SpineElement<NavierStokesTractionElement<Hijacked<ELEMENT> > >(
       mesh_pt()->bulk_inlet_element_pt(i),
       mesh_pt()->face_index_inlet());
     
     //Add Elements to the local storage
     Inlet_traction_element_pt.push_back(inlet_element_pt);
     
     //Set the traction function
     inlet_element_pt->traction_fct_pt() = 
      &Global_Physical_Variables::hydrostatic_pressure;
  
      //Insist that shape derivatives are calculated by "full" finite
     //differences (which is the silent default)
     //inlet_element_pt->evaluate_shape_derivs_by_direct_fd();
  
     
     //Add element to the mesh
     mesh_pt()->add_element_pt(inlet_element_pt);
    }
   
   //Create and set the outlet elements 
   unsigned long noutlet = mesh_pt()->nbulkoutlet();
   for(unsigned long i = 0;i<noutlet;i++)
    {
     SpineGravityTractionElement<Hijacked<ELEMENT> >* outlet_element_pt = 
      new  SpineGravityTractionElement<Hijacked<ELEMENT> >(
       mesh_pt()->bulk_outlet_element_pt(i),
       mesh_pt()->face_index_outlet());   
     
     //Set the  ReInvFr number
     outlet_element_pt->re_invfr_pt() = &Global_Physical_Variables::ReInvFr;
     
     //Set the gravity
     outlet_element_pt->g_pt() = &Global_Physical_Variables::G;
     
     //Add Elements to the local storage
     Outlet_traction_element_pt.push_back(outlet_element_pt);
  
     //Insist that shape derivatives are calculated by "full" finite
     //differences (which is the silent default)
     //outlet_element_pt->evaluate_shape_derivs_by_direct_fd();
     
     //Add element to the mesh
     mesh_pt()->add_element_pt(outlet_element_pt);
    }
   
  
   //Create and set the line elements elements 
   //(the coordinates s constants are the same as in the outlet elements
   unsigned long nlineel = mesh_pt()->ninterfaceline();
   for(unsigned long i = 0;i<nlineel;i++)
    {
     //Cast the return type to  the edge element and also 
     //cast the interface element to the specific interface element
     SpineLineFluidInterfaceBoundingElement<ELEMENT>* line_element_pt = 
      dynamic_cast<SpineLineFluidInterfaceBoundingElement<ELEMENT>*>(
      dynamic_cast<SpineSurfaceFluidInterfaceElement<ELEMENT>*>
      ( mesh_pt()->interface_line_element_pt(i))->make_bounding_element(
       mesh_pt()->face_index_outlet()));
      
     //Set the capillary number
     line_element_pt->ca_pt() =  &Global_Physical_Variables::Ca;
     
     //Add Elements to the local storagea
     Interface_line_element_pt.push_back(line_element_pt);
     
     //Add element to the mesh
     mesh_pt()->add_element_pt(line_element_pt);
     
     //Hijack the nodes
     for(unsigned e=0;e<line_element_pt->nnode();e++)
      line_element_pt ->hijack_nodal_value(e,1);
    }
  
   unsigned n_element = mesh_pt()->nelement();
   cout<<"We have "<<n_bulk<<" bulk elemens, "<<n_interface<<" interface elements,  "<<n_element<<" generic elements in this mesh"<<endl;
   
   mesh_pt()->node_update();
   
   //Now set the boundary conditions by pinning those variables for 
   //which we apply Dirichlet boundary conditions
   
 // Just pin the boundary Dirichlet conditions
   unsigned ibound = 0;
   unsigned num_nod= mesh_pt()->nboundary_node(ibound);
  
   //Base of the tube (pin all values)
   for (unsigned inod=0;inod<num_nod;inod++)
    {
     // Loop over values (ux uy and uz velocities)
     for (unsigned i=0;i<3;i++)
      {
       mesh_pt()->boundary_node_pt(ibound,inod)->pin(i); 
      }
    }
   
   //Inlet boundary (pin the transverse velocity components)
   ibound = 1;
   num_nod= mesh_pt()->nboundary_node(ibound);
   for (unsigned inod=0;inod<num_nod;inod++)
    {
     // Loop over values (ux uy and uz velocities)
     mesh_pt()->boundary_node_pt(ibound,inod)->pin(0);
     mesh_pt()->boundary_node_pt(ibound,inod)->pin(2);  
    }
  
   //Outer wall of the tube (pin all velocitites)
   ibound = 2;
   num_nod= mesh_pt()->nboundary_node(ibound);
   for (unsigned inod=0;inod<num_nod;inod++)
    {
     // Loop over values (ux uy and uz velocities)
     for (unsigned i=0;i<3;i++)
      {
       mesh_pt()->boundary_node_pt(ibound,inod)->pin(i); 
      }
    }
   
  //Outlet (leave free)
  //ibound = 3;
  //num_nod= mesh_pt()->nboundary_node(ibound);
  //for (unsigned inod=0;inod<num_nod;inod++)
  // {
  // }
  
  //Symmetry boundary (apply symmetry conditions in x)
  ibound = 4;   
  num_nod= mesh_pt()->nboundary_node(ibound);
  for (unsigned inod=0;inod<num_nod;inod++)
   {
    mesh_pt()->boundary_node_pt(ibound,inod)->pin(0);  
   }
  
  //Free surface (leave free
  //ibound = 5;
  //num_nod= mesh_pt()->nboundary_node(ibound);
  //for (unsigned inod=0;inod<num_nod;inod++)
  // {
  // }
      
  //Top of the tube (pin all velocities)
  ibound = 6;
  num_nod= mesh_pt()->nboundary_node(ibound);
  for (unsigned inod=0;inod<num_nod;inod++)
   {
    // Loop over values (ux uy and uz velocities)
    for (unsigned i=0;i<3;i++)
     {
      mesh_pt()->boundary_node_pt(ibound,inod)->pin(i); 
     }
   }
  
  // Setup equation numbering scheme
  cout <<"Number of equations: " << assign_eqn_numbers() << std::endl;    
  
 //Set initial guess that all velocities are uniform in the y direction
  const unsigned n_node = mesh_pt()->nnode();
  for(unsigned n=0;n<n_node;n++)
   {
    mesh_pt()->node_pt(n)->set_value(0,0.0);
    mesh_pt()->node_pt(n)->set_value(1,1.0);
    mesh_pt()->node_pt(n)->set_value(2,0.0);
   }
    
  //Set boundary conditions
  //Set the no-slip conditions on all tube boundaries
  unsigned num_bound = mesh_pt()->nboundary();
  for(unsigned ibound=0;ibound<num_bound;ibound++)
   {
    //If we are not on the symmetry boundary (4)
    //Outlet (3), Inlet(1) or free surface (5), set the no-slip conditions
    if((ibound != 4) && (ibound != 3) && (ibound != 1) && (ibound !=5) )
     {
      unsigned num_nod= mesh_pt()->nboundary_node(ibound);
      for (unsigned inod=0;inod<num_nod;inod++)
       {     
        mesh_pt()->boundary_node_pt(ibound,inod)->set_value(0,0.0);
        mesh_pt()->boundary_node_pt(ibound,inod)->set_value(1,1.0);
        mesh_pt()->boundary_node_pt(ibound,inod)->set_value(2,0.0);
       }
     }
   }
  
  //Prepare output information
  
 //Open trace file
  char filename[100];
  sprintf(filename,"RESLT/trace.dat");
  Trace_file.open(filename);
  Trace_file << "VARIABLES=";
  Trace_file << "\"Ca\",\t \"Bo\", \t \"Alpha\",  \t \"m\", \t \"p<sub>bubble</sub>\", \t \"r<sub>h_top</sub>\", \t \"r<sub>d_top</sub>\", \t \"r<sub>h_middle</sub>\", \t \"r<sub>d_bottom</sub>\", \t \"r<sub>h_bottom</sub>\",\t \"lambda\"  ";
  
  Trace_file<<endl;
  
 //Find the trace spines
  
 // Coordinates of the node which indicate the spine to trace
  double x_trace; 
  double y_trace; 
  double z_trace;
  
  // All the nodes to trace are in the last slice
  y_trace = length_can;
  
 //Find the spine of the top (horizontal spine)
  x_trace = 0.0;
  z_trace = height; 
  
  
  //Loop over all nodes
  for(unsigned inod = 0;inod<n_node;inod++)
   {
    SpineNode* spnd_pt = dynamic_cast<SpineNode*>(mesh_pt()->node_pt(inod));
    
    double distance =sqrt( 
     (spnd_pt->x(0) - x_trace)* (spnd_pt->x(0) - x_trace) + 
     (spnd_pt->x(1) - y_trace)* (spnd_pt->x(1) - y_trace) + 
     (spnd_pt->x(2) - z_trace)* (spnd_pt->x(2) - z_trace) );
    if(distance < 10E-8)
     {
      cout<<"Top horizontal Spine found"<<endl;   
      Trace_spine_r_h_top = spnd_pt->spine_pt();
     }
   }
  
  
 //Find the spine of the top (diagonal spine)
  x_trace = alpha/2;
  z_trace = height; 
  
  for(unsigned inod = 0;inod<n_node;inod++)
   {
    SpineNode* spnd_pt = dynamic_cast<SpineNode*>(mesh_pt()->node_pt(inod));
    
    double distance =sqrt( 
     (spnd_pt->x(0) - x_trace)* (spnd_pt->x(0) - x_trace) + 
     (spnd_pt->x(1) - y_trace)* (spnd_pt->x(1) - y_trace) + 
     (spnd_pt->x(2) - z_trace)* (spnd_pt->x(2) - z_trace) );
    if(distance < 10E-8)
     {
      cout<<"Top diagonal Spine found"<<endl;   
      Trace_spine_r_d_top = spnd_pt->spine_pt();
     }
   }
  
  
 //Find the spine of the middle (horizontal spine)
  x_trace = alpha/2;
  z_trace = height/2; 
  
  for(unsigned inod = 0;inod<n_node;inod++)
   {
    SpineNode* spnd_pt = dynamic_cast<SpineNode*>(mesh_pt()->node_pt(inod));
    
    double distance =sqrt( 
     (spnd_pt->x(0) - x_trace)* (spnd_pt->x(0) - x_trace) + 
     (spnd_pt->x(1) - y_trace)* (spnd_pt->x(1) - y_trace) + 
     (spnd_pt->x(2) - z_trace)* (spnd_pt->x(2) - z_trace) );
    if(distance < 10E-8)
     {
      cout<<"Middle horizontal Spine found"<<endl;   
      Trace_spine_r_h_middle = spnd_pt->spine_pt();
     }
   }
  
  
 //Find the spine of the bottom (horizontal spine)
  x_trace = 0.0;
  z_trace = 0.0; 
  
  
  
  for(unsigned inod = 0;inod<n_node;inod++)
   {
    SpineNode* spnd_pt = dynamic_cast<SpineNode*>(mesh_pt()->node_pt(inod));
    
    double distance =sqrt(  
     (spnd_pt->x(0) - x_trace)* (spnd_pt->x(0) - x_trace) + 
     (spnd_pt->x(1) - y_trace)* (spnd_pt->x(1) - y_trace) + 
     (spnd_pt->x(2) - z_trace)* (spnd_pt->x(2) - z_trace) );
    if(distance < 10E-8)
     {
      cout<<"Bottom horizontal Spine found"<<endl;   
      Trace_spine_r_h_bottom = spnd_pt->spine_pt();
     }
   }
  
  
 //Find the spine of the bottom (diagonal spine)
  x_trace = alpha/2;
  z_trace = 0.0; 
  
  
  
  for(unsigned inod = 0;inod<n_node;inod++)
   {
     SpineNode* spnd_pt = dynamic_cast<SpineNode*>(mesh_pt()->node_pt(inod));
    
     double distance =sqrt(
      (spnd_pt->x(0) - x_trace)* (spnd_pt->x(0) - x_trace) + 
      (spnd_pt->x(1) - y_trace)* (spnd_pt->x(1) - y_trace) + 
      (spnd_pt->x(2) - z_trace)* (spnd_pt->x(2) - z_trace) );
     if(distance < 10E-8)
      {
       cout<<"Bottom diagonal Spine found"<<endl;   
       Trace_spine_r_d_bottom = spnd_pt->spine_pt();
      }
     
   }
 }

◆ ~ThreeDimBethertonProblem()

template<class ELEMENT >

ThreeDimBethertonProblem< ELEMENT >::~ThreeDimBethertonProblem

Destructor to clean up memory.

Destructor for RectangularDrivenCavity problem.

 { 
  
  // Timestepper gets killed in general problem destructor
  
  // Mesh gets killed in general problem destructor
  
 }

Member Function Documentation

◆ actions_before_newton_convergence_check()

template<class ELEMENT >

void ThreeDimBethertonProblem< ELEMENT >::actions_before_newton_convergence_check ( )

inlinevirtual

Remesh before any convergence checke.

Reimplemented from oomph::Problem.

   {
    mesh_pt()->node_update();
    
    // This driver code cannot be allowed to use the analytical form of
    // get_dresidual_dnodal_coordinates(...) that is implemented in the
    // NavierStokesEquations class, since the elemental residuals have
    // contributions from external data which is not taken into account
    // by that routine. We therefore force the bulk elements to use the
    // fully-finite differenced version.
    const unsigned n_element = mesh_pt()->nelement();
    for(unsigned e=0;e<n_element;e++)
    {
     if(dynamic_cast<ElementWithMovingNodes*>(mesh_pt()->element_pt(e)))
   {
      ElementWithMovingNodes* el_pt =
        dynamic_cast<ElementWithMovingNodes*>(mesh_pt()->element_pt(e));
       el_pt->evaluate_shape_derivs_by_direct_fd();
      }
    }
   }

References e(), and oomph::ElementWithMovingNodes::evaluate_shape_derivs_by_direct_fd().

◆ doc_solution()

template<class ELEMENT >

void ThreeDimBethertonProblem< ELEMENT >::doc_solution ( DocInfo & doc_info )

Doc the solution.

 { 
  ofstream some_file;
  char filename[100];
  
  double height = Global_Physical_Variables::Height/2 ;  
  double width =  Global_Physical_Variables::Alpha/2; 
  double diagonal = sqrt(height*height + width*width ) ;
  double scale = 1/height;  //scale for the radius 
  
  double outflow =  this->get_outflow();
  
  double capillary_number = Global_Physical_Variables::Ca;
  
  double wet_fraction = outflow/width/(height*2);  
 //The inflow is calculated in half channel
  
  double  p_drop = Bubble_pressure_data_pt->value(0);
  
 // Get finger width at end of the computational domain
  double lambda = get_lambda();
  
  Trace_file<<capillary_number;
  
  Trace_file<<" \t"<<Global_Physical_Variables::Bo;
  
  Trace_file<<" \t"<<Global_Physical_Variables::Alpha;
  
  Trace_file<<" \t"<<wet_fraction;
  
  Trace_file<<" \t"<<p_drop;;
  
  Trace_file<<" \t"<<(height- Trace_spine_r_h_top->height() )*scale ;
  Trace_file<<" \t"<<(diagonal- Trace_spine_r_d_top->height() )*scale ;
  Trace_file<<" \t"<<(width - Trace_spine_r_h_middle->height() )*scale ;
  Trace_file<<" \t"<<(diagonal - Trace_spine_r_d_bottom->height() )*scale ;
  Trace_file<<" \t"<<(height - Trace_spine_r_h_bottom->height() )*scale ;
  
  Trace_file<<" \t"<<lambda ;
  
  Trace_file<<endl;
  
  // Number of plot points
  unsigned npts;
  npts=5; 
  
  mesh_pt()->node_update();
   
  // Output solution 
  sprintf(filename,"%s/soln%i.dat",
          doc_info.directory().c_str(),doc_info.number());
  some_file.open(filename);
  unsigned n_bulk = mesh_pt()->nbulk();
  for(unsigned e=0;e<n_bulk;e++)
   {
    Hijacked<ELEMENT>* el_pt = 
     dynamic_cast<Hijacked<ELEMENT>* >(mesh_pt()->bulk_element_pt(e));
    el_pt->output(some_file,npts);
   }
  some_file.close();
 }

References Global_Physical_Variables::Alpha, Global_Physical_Variables::Bo, Global_Physical_Variables::Ca, diagonal(), oomph::DocInfo::directory(), e(), MergeRestartFiles::filename, Global_Physical_Variables::height(), Global_Physical_Variables::Height, lambda, oomph::DocInfo::number(), sqrt(), and oomph::Problem_Parameter::Trace_file.

◆ fix_pressure()

template<class ELEMENT >

void ThreeDimBethertonProblem< ELEMENT >::fix_pressure	(	const unsigned int &	e,
		const unsigned int &	pdof,
		const double &	pvalue
	)

inline

Fix pressure in element e at pressure dof pdof and set to pvalue.

   {
    //Cast to full element type and fix the pressure at that element
    dynamic_cast<ELEMENT*>(mesh_pt()->element_pt(e))->
                           fix_pressure(pdof,pvalue);
   }

References e().

◆ get_lambda()

template<class ELEMENT >

double ThreeDimBethertonProblem< ELEMENT >::get_lambda ( )

inline

   { 
    //Initial max
    double max_x = 0.0;
    //Loop over all in interface elements
    unsigned n_line_interface = Interface_line_element_pt.size();
    for(unsigned e=0;e<n_line_interface;e++)
     {
      //Cache the element
      FiniteElement* const element_pt = Interface_line_element_pt[e];
      //Loop over all nodes
      const unsigned n_node = element_pt->nnode();
      for(unsigned n=0;n<n_node;n++)
       {
        if(element_pt->node_pt(n)->x(0) > max_x) 
         {max_x = element_pt->node_pt(n)->x(0);}
       }
     }
    //Now scale by the half-width
    return max_x/(Global_Physical_Variables::Alpha/2);
   }

References Global_Physical_Variables::Alpha, e(), n, oomph::FiniteElement::nnode(), oomph::FiniteElement::node_pt(), and oomph::Node::x().

◆ get_outflow()

template<class ELEMENT >

double ThreeDimBethertonProblem< ELEMENT >::get_outflow ( )

inline

   {
    double flow = 0;
    unsigned int nel = Outlet_traction_element_pt.size();
    for(unsigned int i =0;i<nel;i++)
     {
      flow += dynamic_cast<SpineGravityTractionElement<Hijacked<ELEMENT> >* >
       (Outlet_traction_element_pt[i])->flow();
     }
    return flow;
   }

References i.

◆ mesh_pt()

template<class ELEMENT >

STSpineMesh<Hijacked<ELEMENT>, SpineSurfaceFluidInterfaceElement<ELEMENT> >* ThreeDimBethertonProblem< ELEMENT >::mesh_pt ( )

inline

   {
    // Upcast from pointer to the Mesh base class to the specific 
    // element type that we're using here.
    return dynamic_cast< STSpineMesh<Hijacked<ELEMENT>, 
     SpineSurfaceFluidInterfaceElement<ELEMENT> >* >(Problem::mesh_pt());
   }

◆ multiply_aspect_ratio()

template<class ELEMENT >

void ThreeDimBethertonProblem< ELEMENT >::multiply_aspect_ratio	(	const double	factor,
		const bool &	mult_width
	)

inline

   {
    // until now we have just worked with a square channel
    // lets change the aspect ratio
    // we will change also the y aspect ratio 
    // so that the tip is also streched in the y direction can be changed
  
    //Loop over all nodes in the mesh
    const unsigned n_node = mesh_pt()->nnode();
    for(unsigned n=0;n<n_node;n++)
     {
      //Multiply the x-coordinate and y-coordinate by the specified factor
      Node* const node_pt =  mesh_pt()->node_pt(n);
      if(mult_width){node_pt->x(0) =  node_pt->x(0) * factor ;}
      node_pt->x(1) =  node_pt->x(1) * factor;
     }
    
    // Update also the origin of the spines to the new position
    // of the sidewalls
    const unsigned n_spine = mesh_pt()->nspine();
    for(unsigned s = 0;s<n_spine;s++)
     {
      Spine* spine_pt = mesh_pt()->spine_pt(s);
      const double x_spine = spine_pt->geom_parameter(0);
      const double y_spine = spine_pt->geom_parameter(1);
      if(mult_width){spine_pt->geom_parameter(0) = x_spine * factor;}
      spine_pt->geom_parameter(1) = y_spine * factor;
     }
    
    
    // Update the spines heights according to the new geometry
    // This is done by looping over all nodes on the free surface
    // and calculating the distance from the new side wall
    const unsigned n_boundary_node = mesh_pt()->nboundary_node(5);
    
    for(unsigned n=0;n<n_boundary_node;n++)
     {
      //Get the root of the spine
      SpineNode* spine_node_pt =  
       dynamic_cast<SpineNode*>(mesh_pt()->boundary_node_pt(5,n));
      Spine* spine_pt = spine_node_pt->spine_pt();
      double x_spine = spine_pt->geom_parameter(0);
      double y_spine = spine_pt->geom_parameter(1);
      double z_spine = spine_pt->geom_parameter(2);
      
      //Find the distance of the node on the free surface from the root
      //of the spine
      double  distance = sqrt( 
       (spine_node_pt->x(0) -  x_spine )*(spine_node_pt->x(0) -  x_spine )+
       (spine_node_pt->x(1) -  y_spine)*(spine_node_pt->x(1) -  y_spine)+ 
       (spine_node_pt->x(2) -  z_spine)*(spine_node_pt->x(2) -  z_spine) );
      //Set the spine length to be the new distance
      spine_node_pt->h() = distance;
     }
    
    //Change also the distance of the fixed spine by the factor
    Fixed_spine_height =  Fixed_spine_height *factor;
    // At the end we change the value of Alpha
    if(mult_width){Global_Physical_Variables::Alpha =  
                    Global_Physical_Variables::Alpha * factor;}
    if(!mult_width){ Global_Physical_Variables::Radius =  
                      Global_Physical_Variables::Radius *factor;}
    Global_Physical_Variables::Length_tip =  
     Global_Physical_Variables::Length_tip * factor;
    Global_Physical_Variables::Length_can =  
     Global_Physical_Variables::Length_can * factor;
    Global_Physical_Variables::Length_liq =  
     Global_Physical_Variables::Length_liq * factor; 
   }

References Global_Physical_Variables::Alpha, oomph::Spine::geom_parameter(), oomph::SpineNode::h(), Global_Physical_Variables::Length_can, Global_Physical_Variables::Length_liq, Global_Physical_Variables::Length_tip, n, Global_Physical_Variables::Radius, s, oomph::SpineNode::spine_pt(), sqrt(), and oomph::Node::x().

Member Data Documentation

◆ Bubble_pressure_data_pt

template<class ELEMENT >

Data* ThreeDimBethertonProblem< ELEMENT >::Bubble_pressure_data_pt

private

◆ Fix_spine_height_element_pt

template<class ELEMENT >

FiniteElement* ThreeDimBethertonProblem< ELEMENT >::Fix_spine_height_element_pt

private

◆ Fixed_spine_height

template<class ELEMENT >

double ThreeDimBethertonProblem< ELEMENT >::Fixed_spine_height

◆ Inlet_traction_element_pt

template<class ELEMENT >

Vector<FiniteElement*> ThreeDimBethertonProblem< ELEMENT >::Inlet_traction_element_pt

private

◆ Interface_line_element_pt

template<class ELEMENT >

Vector<FiniteElement*> ThreeDimBethertonProblem< ELEMENT >::Interface_line_element_pt

private

◆ Outlet_traction_element_pt

template<class ELEMENT >

Vector<FiniteElement*> ThreeDimBethertonProblem< ELEMENT >::Outlet_traction_element_pt

private

◆ Trace_file

template<class ELEMENT >

ofstream ThreeDimBethertonProblem< ELEMENT >::Trace_file

private

Trace file.

◆ Trace_spine_r_d_bottom

template<class ELEMENT >

Spine* ThreeDimBethertonProblem< ELEMENT >::Trace_spine_r_d_bottom

private

◆ Trace_spine_r_d_top

template<class ELEMENT >

Spine* ThreeDimBethertonProblem< ELEMENT >::Trace_spine_r_d_top

private

◆ Trace_spine_r_h_bottom

template<class ELEMENT >

Spine* ThreeDimBethertonProblem< ELEMENT >::Trace_spine_r_h_bottom

private

◆ Trace_spine_r_h_middle

template<class ELEMENT >

Spine* ThreeDimBethertonProblem< ELEMENT >::Trace_spine_r_h_middle

private

◆ Trace_spine_r_h_top

template<class ELEMENT >

Spine* ThreeDimBethertonProblem< ELEMENT >::Trace_spine_r_h_top

private

The documentation for this class was generated from the following file:

three_d_breth.cc

Public Member Functions

Public Attributes

Private Attributes

Additional Inherited Members

Detailed Description

template<class ELEMENT> class ThreeDimBethertonProblem< ELEMENT >

Constructor & Destructor Documentation

◆ ThreeDimBethertonProblem()

◆ ~ThreeDimBethertonProblem()

Member Function Documentation

◆ actions_before_newton_convergence_check()

◆ doc_solution()

◆ fix_pressure()

◆ get_lambda()

◆ get_outflow()

◆ mesh_pt()

◆ multiply_aspect_ratio()

Member Data Documentation

◆ Bubble_pressure_data_pt

◆ Fix_spine_height_element_pt

◆ Fixed_spine_height

◆ Inlet_traction_element_pt

◆ Interface_line_element_pt

◆ Outlet_traction_element_pt

◆ Trace_file

◆ Trace_spine_r_d_bottom

◆ Trace_spine_r_d_top

◆ Trace_spine_r_h_bottom

◆ Trace_spine_r_h_middle

◆ Trace_spine_r_h_top

template<class ELEMENT>
class ThreeDimBethertonProblem< ELEMENT >