Inheritance diagram for RefineableRotatingCylinderProblem< ELEMENT >:

Public Member Functions
	RefineableRotatingCylinderProblem (const double &length, const double &height)

void	actions_after_newton_solve ()
	Update the problem specs after solve (empty) More...

void	actions_before_newton_solve ()
	Update the problem specs before solve: More...

void	actions_before_adapt ()
	Strip off the interface before adaptation. More...

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

void	finish_problem_setup ()

void	set_boundary_conditions ()

void	solve ()

void	create_volume_constraint_elements ()
	Create the volume constraint elements. More...

void	delete_volume_constraint_elements ()

void	create_free_surface_elements ()

void	delete_free_surface_elements ()

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

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	Re

double	Ca

double	ReInvFr

double	Bo

double	Omega

double	Volume

double	Angle

Vector< double >	G

RefineableCylinderAndInterfaceMesh< ELEMENT > *	Bulk_mesh_pt

Mesh *	Surface_mesh_pt

Mesh *	Point_mesh_pt

Mesh *	Volume_constraint_mesh_pt
	The volume constraint mesh. More...

Public Attributes inherited from oomph::Problem
bool	Shut_up_in_newton_solve

Private Attributes
double	Length

double	Height

ConstitutiveLaw *	Constitutive_law_pt

Data *	Traded_pressure_data_pt

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_convergence_check ()

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...

Constructor & Destructor Documentation

◆ RefineableRotatingCylinderProblem()

template<class ELEMENT >

RefineableRotatingCylinderProblem< ELEMENT >::RefineableRotatingCylinderProblem	(	const double &	length,
		const double &	height
	)

Constructor: Pass flag to indicate if you want a constant source function or the tanh profile.

Constructor for adaptive Poisson problem in deformable fish-shaped domain. Pass bool to indicate if we want a constant source function or the one that produces a tanh step.

Set the initial value of the ReInvFr = Bo/Ca

Build a linear solver: Use HSL's MA42 frontal solver

Switch off full doc for frontal solver

                                              : Length(length), Height(height),
                                                Re(0.0), Ca(0.001), 
                                                ReInvFr(0.0),
                                                Bo(0.0), Omega(1.0), 
                                                Volume(12.0),
                                                Angle(1.57)
 { 
  Global_Physical_Variables::Wall_normal.resize(2);
  Global_Physical_Variables::Wall_normal[0] = 1.0; 
  Global_Physical_Variables::Wall_normal[1] = 0.0;
  
  G.resize(2);
  G[0] = 0.0; G[1] = -1.0;
  
  ReInvFr = Bo/Ca;
  
  //linear_solver_pt() = new HSL_MA42;
  
  //Set the constituive law
  Constitutive_law_pt = new GeneralisedHookean(&Global_Physical_Variables::Nu);
  
  
  //static_cast<HSL_MA42*>(linear_solver_pt())->disable_doc_stats();
  
  //Allocate the timestepper (no timedependence)
  add_time_stepper_pt(new Steady<0>);
    
  // Build mesh
  Bulk_mesh_pt= 
   new RefineableCylinderAndInterfaceMesh<ELEMENT>(length,height,
                                                   Problem::time_stepper_pt());
  
  // Set error estimator
  Z2ErrorEstimator* error_estimator_pt=new Z2ErrorEstimator;
  Bulk_mesh_pt->spatial_error_estimator_pt()=error_estimator_pt;
   
  
  //Refine the problem a couple of times
  bool update_all_solid_nodes=true;
  Bulk_mesh_pt->refine_uniformly();
  Bulk_mesh_pt->node_update(update_all_solid_nodes);
  Bulk_mesh_pt->refine_uniformly();
  Bulk_mesh_pt->node_update(update_all_solid_nodes);
  //Bulk_mesh_pt->refine_uniformly();
  //refine_uniformly();
  //refine_uniformly();
   
  // Loop over all elements and unset macro element pointer
  unsigned Nelement = Bulk_mesh_pt->nelement();
  for(unsigned e=0;e<Nelement;e++)
   {
    dynamic_cast<ELEMENT*>(Bulk_mesh_pt->element_pt(e))->
     set_macro_elem_pt(0);
   }
  
  
  //The external pressure is a piece of global data
  Traded_pressure_data_pt = new Data(1);
  this->add_global_data(Traded_pressure_data_pt);
  
  // Complete the build of all elements so they are fully functional
  
  Surface_mesh_pt = new Mesh;
  Point_mesh_pt = new Mesh;
  Volume_constraint_mesh_pt = new Mesh;
  
  finish_problem_setup();
   
  this->add_sub_mesh(Bulk_mesh_pt);
  this->add_sub_mesh(Surface_mesh_pt);
  this->add_sub_mesh(Point_mesh_pt);
  this->add_sub_mesh(Volume_constraint_mesh_pt);
  
  this->build_global_mesh();
  
  //Attach the boundary conditions to the mesh
  oomph_info <<"Number of equations: " << assign_eqn_numbers() << std::endl; 
  
 }

Member Function Documentation

◆ actions_after_adapt()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::actions_after_adapt ( )

inlinevirtual

Actions that are to be performed after a mesh adaptation.

Reimplemented from oomph::Problem.

761 {finish_problem_setup(); this->rebuild_global_mesh();}

oomph::Problem::rebuild_global_mesh

void rebuild_global_mesh()

Definition: problem.cc:1533

◆ actions_after_newton_solve()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::actions_after_newton_solve ( )

inlinevirtual

Update the problem specs after solve (empty)

Reimplemented from oomph::Problem.

749 {}

◆ actions_before_adapt()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::actions_before_adapt ( )

inlinevirtual

Strip off the interface before adaptation.

Reimplemented from oomph::Problem.

   {
    this->delete_volume_constraint_elements();
    this->delete_free_surface_elements();
   }

◆ actions_before_newton_solve()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::actions_before_newton_solve ( )

inlinevirtual

Update the problem specs before solve:

Reimplemented from oomph::Problem.

752 {set_boundary_conditions();}

RefineableRotatingCylinderProblem::set_boundary_conditions

void set_boundary_conditions()

Definition: adaptive_interface.cc:1137

◆ create_free_surface_elements()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::create_free_surface_elements ( )

inline

   {
    //Find number of elements adjacent to upper boundary
    unsigned n_boundary_element = Bulk_mesh_pt->nboundary_element(2);
    //The boundary elements do no necessarily come in order, so we will
    //need to detect the element adjacent to boundary 1.
    //The index of that element in our array will be stored in this variable
    //(initialised to a negative and therefore invalid number)
    int final_element_index=-1;
    //Loop over the elements adjacent to the boundary
    for(unsigned e=0;e<n_boundary_element;e++)
     {
      //Create the free surface element (on face 2)
      FiniteElement *free_surface_element_pt 
       = new ElasticLineFluidInterfaceElement<ELEMENT>
       (Bulk_mesh_pt->boundary_element_pt(2,e),
        Bulk_mesh_pt->face_index_at_boundary(2,e));
      //Push it back onto the stack
      Surface_mesh_pt->add_element_pt(free_surface_element_pt);       
  
       //Check whether the element is on the boundary 1
       unsigned n_node = free_surface_element_pt->nnode();
       //Only need to check the end nodes
       if((free_surface_element_pt->node_pt(0)->is_on_boundary(1)) ||
          (free_surface_element_pt->node_pt(n_node-1)->is_on_boundary(1)))
        {
           final_element_index=e;
        }
     }
  
    unsigned Nfree = Surface_mesh_pt->nelement();
    oomph_info << Nfree << " free surface elements assigned" << std::endl;
  
     if(final_element_index == -1)
      {
       throw OomphLibError("No Surface Element adjacent to boundary 1\n",
                           OOMPH_CURRENT_FUNCTION,
                           OOMPH_EXCEPTION_LOCATION);
      }
    
     //Make the edge point
     FiniteElement* point_element_pt= 
      dynamic_cast<ElasticLineFluidInterfaceElement<ELEMENT>*>
      (Surface_mesh_pt->element_pt(final_element_index))
      ->make_bounding_element(1);
     
     //Add it to the stack
     Point_mesh_pt->add_element_pt(point_element_pt);
   }

References oomph::Mesh::add_element_pt(), oomph::Mesh::boundary_element_pt(), e(), oomph::Mesh::element_pt(), oomph::Mesh::face_index_at_boundary(), oomph::Node::is_on_boundary(), oomph::Mesh::nboundary_element(), oomph::Mesh::nelement(), oomph::FiniteElement::nnode(), oomph::FiniteElement::node_pt(), OOMPH_CURRENT_FUNCTION, OOMPH_EXCEPTION_LOCATION, and oomph::oomph_info.

◆ create_volume_constraint_elements()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::create_volume_constraint_elements ( )

inline

Create the volume constraint elements.

   {
    //The single volume constraint element
    VolumeConstraintElement* vol_constraint_element = 
     new VolumeConstraintElement(&Volume,Traded_pressure_data_pt,0);
    Volume_constraint_mesh_pt->add_element_pt(vol_constraint_element);
    
    //Loop over all boundaries (or just 1 and 2 why?)
    for(unsigned b=0;b<4;b++)
     {
      // How many bulk fluid elements are adjacent to boundary b?
      unsigned n_element = Bulk_mesh_pt->nboundary_element(b);
      
      // Loop over the bulk fluid elements adjacent to boundary b?
      for(unsigned e=0;e<n_element;e++)
       {
        // Get pointer to the bulk fluid element that is 
        // adjacent to boundary b
        ELEMENT* bulk_elem_pt = dynamic_cast<ELEMENT*>(
         Bulk_mesh_pt->boundary_element_pt(b,e));
        
        //Find the index of the face of element e along boundary b
        int face_index = Bulk_mesh_pt->face_index_at_boundary(b,e);
        
        // Create new element
        ElasticLineVolumeConstraintBoundingElement<ELEMENT>* el_pt =
         new ElasticLineVolumeConstraintBoundingElement<ELEMENT>(
          bulk_elem_pt,face_index);   
        
        //Set the "master" volume control element
        el_pt->set_volume_constraint_element(vol_constraint_element);
        
        // Add it to the mesh
        Volume_constraint_mesh_pt->add_element_pt(el_pt);     
       }
     }
   }

References oomph::Mesh::add_element_pt(), b, oomph::Mesh::boundary_element_pt(), e(), oomph::Mesh::face_index_at_boundary(), oomph::Mesh::nboundary_element(), oomph::VolumeConstraintBoundingElement::set_volume_constraint_element(), and Global_Physical_Variables::Volume.

◆ delete_free_surface_elements()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::delete_free_surface_elements ( )

inline

   {
    //Find the number of traction elements
    unsigned Nfree_surface = Surface_mesh_pt->nelement();
    
    //The traction elements are ALWAYS? stored at the end
    //So delete and remove them, add one to get rid of the constraint
    for(unsigned e=0;e<Nfree_surface;e++)
     {
      delete Surface_mesh_pt->element_pt(e);
     }
    Surface_mesh_pt->flush_element_and_node_storage();
  
    delete Point_mesh_pt->element_pt(0);
    Point_mesh_pt->flush_element_and_node_storage();
   }

References e(), oomph::Mesh::element_pt(), oomph::Mesh::flush_element_and_node_storage(), and oomph::Mesh::nelement().

◆ delete_volume_constraint_elements()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::delete_volume_constraint_elements ( )

inline

   {
    unsigned n_element = Volume_constraint_mesh_pt->nelement();
    for(unsigned e=0;e<n_element;e++)
     {
      delete Volume_constraint_mesh_pt->element_pt(e);
     }
    Volume_constraint_mesh_pt->flush_element_and_node_storage();
   }

References e(), oomph::Mesh::element_pt(), oomph::Mesh::flush_element_and_node_storage(), and oomph::Mesh::nelement().

◆ finish_problem_setup()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::finish_problem_setup

Complete problem setup: Setup element-specific things (source fct pointers etc.)

Complete build of Poisson problem: Loop over elements and setup pointers to source function

 { 
  //Now sort out the free surface
  this->create_free_surface_elements();
  //Create the volume constraint elements
  this->create_volume_constraint_elements();
  
  // Set the boundary conditions for this problem: All nodes are
  // free by default -- just pin the ones that have Dirichlet conditions
  // here. 
  
  //Pin bottom and cylinder
   unsigned num_bound = Bulk_mesh_pt->nboundary();
   for(unsigned ibound=0;ibound<num_bound;ibound+=4)
    {
     unsigned num_nod= Bulk_mesh_pt->nboundary_node(ibound);
     for (unsigned inod=0;inod<num_nod;inod++)
      {
       Bulk_mesh_pt->boundary_node_pt(ibound,inod)->pin(0);
       Bulk_mesh_pt->boundary_node_pt(ibound,inod)->pin(1);
      }
    }
   
   //Pin u and v on LHS
   {
    unsigned num_nod= Bulk_mesh_pt->nboundary_node(3);
    for (unsigned inod=0;inod<num_nod;inod++)
     {
      Bulk_mesh_pt->boundary_node_pt(3,inod)->pin(0);
      //Bulk_mesh_pt->boundary_node_pt(3,inod)->pin(1);
     }
   }
   
   //Pin u and v on RHS
   {
    unsigned num_nod= Bulk_mesh_pt->nboundary_node(1);
    for (unsigned inod=0;inod<num_nod;inod++)
     {
      Bulk_mesh_pt->boundary_node_pt(1,inod)->pin(0);
      Bulk_mesh_pt->boundary_node_pt(1,inod)->pin(1);
     }
   }
  
   
   dynamic_cast<FluidInterfaceBoundingElement*>
    (Point_mesh_pt->element_pt(0))->set_contact_angle(&Angle);
  
   dynamic_cast<FluidInterfaceBoundingElement*>
    (Point_mesh_pt->element_pt(0))->ca_pt() = &Ca;
  
   
   dynamic_cast<FluidInterfaceBoundingElement*>
    (Point_mesh_pt->element_pt(0))->
    wall_unit_normal_fct_pt() = &Global_Physical_Variables::wall_unit_normal_fct;
  
   //Pin one pressure
   dynamic_cast<ELEMENT*>(Bulk_mesh_pt->element_pt(0))->fix_pressure(0,0.0);
  
   //Loop over the lower boundary and pin nodal positions in both directions
   unsigned num_nod= Bulk_mesh_pt->nboundary_node(0);
   for (unsigned inod=0;inod<num_nod;inod++)
    {
     Bulk_mesh_pt->boundary_node_pt(0,inod)->pin_position(0);
     Bulk_mesh_pt->boundary_node_pt(0,inod)->pin_position(1);
    }
   
   //Loop over the RHS side and pin in x and y
   num_nod= Bulk_mesh_pt->nboundary_node(1);
   for (unsigned inod=0;inod<num_nod;inod++)
    {
     Bulk_mesh_pt->boundary_node_pt(1,inod)->pin_position(0);
     //Bulk_mesh_pt->boundary_node_pt(1,inod)->pin_position(1);
   }
   
   
  //Loop over the LHS side and pin in x
   num_nod= Bulk_mesh_pt->nboundary_node(3);
  for (unsigned inod=0;inod<num_nod;inod++)
   {
    Bulk_mesh_pt->boundary_node_pt(3,inod)->pin_position(0);
    //Bulk_mesh_pt->boundary_node_pt(3,inod)->pin_position(1);
   }
  
  //Loop over the cylinder and pin nodal positions in both directions
  num_nod= Bulk_mesh_pt->nboundary_node(4);
  for (unsigned inod=0;inod<num_nod;inod++)
   {
    Bulk_mesh_pt->boundary_node_pt(4,inod)->pin_position(0);
    Bulk_mesh_pt->boundary_node_pt(4,inod)->pin_position(1);
   }
  
  
  //Find number of elements in mesh
  unsigned Nfluid = Bulk_mesh_pt->nelement();
  //Find the number of free surface elements
  unsigned Nfree = Surface_mesh_pt->nelement();
  
     // Loop over the elements to set up element-specific 
     // things that cannot be handled by constructor
     for(unsigned i=0;i<Nfluid;i++)
      {
       // Upcast from FiniteElement to the present element
       ELEMENT *temp_pt = dynamic_cast<ELEMENT*>(Bulk_mesh_pt->element_pt(i));
       
       //Set the source function pointer
       temp_pt->re_pt() = &Re;
       temp_pt->re_invfr_pt() = &ReInvFr;
       temp_pt->g_pt() = &G;
       
       //Assign the mesh deformation constitutive law
       temp_pt->constitutive_law_pt() = Constitutive_law_pt;
       
      }
     
     
     // Pin the redundant solid pressures (if any)
     PVDEquationsBase<2>::pin_redundant_nodal_solid_pressures(
      Bulk_mesh_pt->element_pt());
     
     //Loop over the free surface elements
     for(unsigned i=0;i<Nfree;i++)
      {
       // Upcast from FiniteElement to the present element
       ElasticLineFluidInterfaceElement<ELEMENT> *temp_pt = 
        dynamic_cast<ElasticLineFluidInterfaceElement<ELEMENT>*>
        (Surface_mesh_pt->element_pt(i));
       //Set the Capillary number
       temp_pt->ca_pt() = &Ca;
       
       //Pass the Data item that contains the external pressure
       temp_pt->set_external_pressure_data(this->global_data_pt(0));
      }
    
 }

References Global_Physical_Variables::Angle, Global_Physical_Variables::Ca, oomph::FluidInterfaceElement::ca_pt(), Constitutive::Constitutive_law_pt, G, i, GlobalPhysicalVariables::Re, GlobalPhysicalVariables::ReInvFr, oomph::FluidInterfaceElement::set_external_pressure_data(), and Global_Physical_Variables::wall_unit_normal_fct().

Referenced by RefineableRotatingCylinderProblem< ELEMENT >::RefineableRotatingCylinderProblem().

◆ set_boundary_conditions()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::set_boundary_conditions

 { 
  //Only bother to set non-zero velocity on the cylinder
  unsigned Nnode = Bulk_mesh_pt->nboundary_node(4);
  for(unsigned n=0;n<Nnode;n++)
   {
    //Get x and y
    double x = Bulk_mesh_pt->boundary_node_pt(4,n)->x(0);
    double y = Bulk_mesh_pt->boundary_node_pt(4,n)->x(1);
  
    //Now find the vector distance to the centre
    double len_x = x - Bulk_mesh_pt->domain_pt()->centre_x;
    double len_y = y - Bulk_mesh_pt->domain_pt()->centre_y;
  
    //Calculate the angle and radius
    double r = sqrt(len_x*len_x + len_y*len_y);
    double theta = atan2(len_y,len_x);
    
    //Now set the velocities
    Bulk_mesh_pt->boundary_node_pt(4,n)->set_value(0,-Omega*r*sin(theta));
    Bulk_mesh_pt->boundary_node_pt(4,n)->set_value(1, Omega*r*cos(theta));
   }
 }

References atan2(), cos(), n, oomph::SarahBL::Omega, UniformPSDSelfTest::r, sin(), sqrt(), BiharmonicTestFunctions2::theta, plotDoE::x, and y.

◆ solve()

template<class ELEMENT >

void RefineableRotatingCylinderProblem< ELEMENT >::solve

 { 
  Newton_solver_tolerance = 1.0e-8;
  //Document the solution
  std::ofstream filenamee("input.dat");
  Bulk_mesh_pt->output(filenamee,5);
  Surface_mesh_pt->output(filenamee,5);
  //Point_mesh_pt->output(filenamee,5);
  filenamee.close();
  
  //Solve the initial value problem
  newton_solve();
  
  std::ofstream filename("first.dat"); 
  Bulk_mesh_pt->output(filename,5); 
  Surface_mesh_pt->output(filename,5); 
  //Point_mesh_pt->output(filename,5);
  filename.close();
  
  //Initialise the value of the arc-length
  double ds=0.001;
  
  std::ofstream trace("trace.dat");
  
  trace << Ca << " " << ReInvFr << " "
        << Bulk_mesh_pt->boundary_node_pt(2,0)->x(1) << std::endl;
  
 // bool flag=true, fflag=true;
  
  for(unsigned i=0;i<2;i++)
   {
    if(i<5)
     {
      //Decrease the contact angle
      Angle -= 0.1;
      newton_solve(2);
      //newton_solve();
     }
    else
     {
      //do an arc-length continuation step in Ca
      ds = arc_length_step_solve(&Ca,ds);
     }
  
   //  if(flag)
 //     {
 //      //Do an arc-length continuation step in ReInvFr
 //      ds = arc_length_step_solve(&ReInvFr,ds);
 //     }
 //    else
 //     {
 //      //Reset arc-length parameters
 //      if(fflag) {reset_arc_length_parameters(); fflag=false;}
 //      ds = 0.001;
 //      //Now do it in Ca
 //      ds = arc_length_step_solve(&Ca,ds);
 //     }
  
 //    if(Bulk_mesh_pt->boundary_node_pt(2,0)->x(1) < 4.0)
 //     {flag=false;}
  
    trace << Ca << " " << ReInvFr << " " << Angle << " "
          << Bulk_mesh_pt->boundary_node_pt(2,0)->x(1) << std::endl;   
    
    char file[100];
    sprintf(file,"step%i.dat",i);
    filename.open(file);
    Bulk_mesh_pt->output(filename,5);
    Surface_mesh_pt->output(filename,5);
    //Point_mesh_pt->output(filename,5);
    filename.close();
  
    //Now reset the values of the lagrange multipliers and the xi's
    //An updated lagrangian approach
    
    //Now loop over all the nodes and set their Lagrangian coordinates
    unsigned Nnode = Bulk_mesh_pt->nnode();
    for(unsigned n=0;n<Nnode;n++)
     {
      //Cast node to an elastic node
      SolidNode* temp_pt = static_cast<SolidNode*>(Bulk_mesh_pt->node_pt(n));
      for(unsigned j=0;j<2;j++) {temp_pt->xi(j) = temp_pt->x(j);}
     }
  
    //Find the number of free surface elements
    unsigned Nfree = Surface_mesh_pt->nelement();
    //Loop over the free surface elements
    for(unsigned n=0;n<Nfree;n++)
     {
      // Upcast from FiniteElement to the present element
      ElasticLineFluidInterfaceElement<ELEMENT> *temp_pt = 
       dynamic_cast<ElasticLineFluidInterfaceElement<ELEMENT>*>
       (Surface_mesh_pt->element_pt(n));
      unsigned Nnode = temp_pt->nnode();
      //Reset the lagrange multipliers
      for(unsigned j=0;j<Nnode;j++) {temp_pt->lagrange(j) = 0.0;}
     }
   }
  
  //Document the solution
  //filename.open("output.dat");
  //Bulk_mesh_pt->output(filename,5);
  //filename.close();
  trace.close();
 }