spine_two_layer_interface_axisym.cc File Reference

#include "generic.h"
#include "axisym_navier_stokes.h"
#include "navier_stokes.h"
#include "fluid_interface.h"
#include "oomph_crbond_bessel.h"
#include "meshes/two_layer_spine_mesh.h"

Classes
class	InterfaceProblem< ELEMENT, TIMESTEPPER >
	Single axisymmetric fluid interface problem in rectangular domain. More...

Namespaces
	Global_Physical_Variables
	Global variables.

Functions
int	main (int argc, char *argv[])
	Driver code for axisymmetric two fluid interface problem. More...

Variables
Vector< double >	Global_Physical_Variables::G (3) = 1.0
	Direction of gravity. More...

Function Documentation

main()

int main	(	int argc	,
		char *	argv[]
	)

Driver code for axisymmetric two fluid interface problem.

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

Maximum time

Duration of timestep

{
 // Store command line arguments
 CommandLineArgs::setup(argc,argv);
 
 // Compute the Womersley number
 Global_Physical_Variables::ReSt =
  Global_Physical_Variables::Re*Global_Physical_Variables::St;
 
 double t_max = 1.2;
 
 const double dt = 0.005;
 
 // If we are doing validation run, use smaller number of timesteps
 if(CommandLineArgs::Argc>1) { t_max = 0.01; }
 
 // Number of elements in r direction
 const unsigned n_r = 12;
   
 // Number of elements in z direction in lower fluid (fluid 1)
 const unsigned n_z1 = 12;
   
 // Number of elements in z direction in upper fluid (fluid 2)
 const unsigned n_z2 = 12;
 
 // Width of domain
 const double l_r = 1.0;
 
 // Height of lower fluid layer
 const double h1 = 1.0;
   
 // Height of upper fluid layer
 const double h2 = 1.0;
 
 // Set direction of gravity (vertically downwards)
 Global_Physical_Variables::G[0] = 0.0;
 Global_Physical_Variables::G[1] = -1.0;
 Global_Physical_Variables::G[2] = 0.0;
 
 // Set up the spine test problem with AxisymmetricQCrouzeixRaviartElements,
 // using the BDF<2> timestepper
 InterfaceProblem<SpineElement<AxisymmetricQCrouzeixRaviartElement>,
  BDF<2> >
  problem(n_r,n_z1,n_z2,l_r,h1,h2);
   
 // Run the unsteady simulation
 problem.unsteady_run(t_max,dt);
 
} // End of main

References oomph::CommandLineArgs::Argc, Global_Physical_Variables::G, problem, Global_Physical_Variables::Re, Global_Physical_Variables::ReSt, Flag_definition::setup(), and Global_Physical_Variables::St.