smod_equil_taylor_couette Submodule

This submodule defines a steady Taylor-Couette flow in a cylindrical geometry where a fluid is confined between two (rotating) coaxial cylinders (without a magnetic field).

This equilibrium is taken from Gebhardt, Thomas and Grossman, Siegfried. "The Taylor-Couette eigenvalue problem with independently rotating cylinders.", Z. Phys. B 90, 475--490 (1993).

Contents

Variables

h Rrat A B Tstart x_start x_end

Functions

rho0 T0 dT0 v02 dv02 ddv02

Module Procedures

taylor_couette_eq

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=dp),	private		::	h
real(kind=dp),	private		::	Rrat
real(kind=dp),	private		::	A
real(kind=dp),	private		::	B
real(kind=dp),	private		::	Tstart
real(kind=dp),	private		::	x_start
real(kind=dp),	private		::	x_end

Functions

function rho0()

Arguments

None

Return Value real(kind=dp)

function T0(r)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	r

Return Value real(kind=dp)

function dT0(r)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	r

Return Value real(kind=dp)

function v02(r)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	r

Return Value real(kind=dp)

function dv02(r)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	r

Return Value real(kind=dp)

function ddv02(r)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	r

Return Value real(kind=dp)

Module Procedures

module procedure taylor_couette_eq module module subroutine taylor_couette_eq(settings, grid, background, physics) Interface →

Arguments

Type	Intent	Optional	Attributes		Name
type(settings_t),	intent(inout)			::	settings
type(grid_t),	intent(inout)			::	grid
type(background_t),	intent(inout)			::	background
type(physics_t),	intent(inout)			::	physics