nochiral

Module

Description

$Id$

This modules solves two reactive scalar advection equations This is used for modeling the spatial evolution of left and right handed aminoacids.

** AUTOMATIC CPARAM.INC GENERATION ************************ Declare (for generation of cparam.inc) the number of f array variables and auxiliary variables added by this module

CPARAM logical, parameter :: lchiral = .false.

MVAR CONTRIBUTION 0 MAUX CONTRIBUTION 0

Quick access

Variables:

amplxx_chiral, amplyy_chiral, amplzz_chiral, chiral_crossinhibition, chiral_diff, chiral_diffxx, chiral_diffzz, chiral_fidelity, chiral_fisherh, chiral_fisherk, chiral_fishermu, chiral_fishernu, chiral_fisherr, chiral_fisherr2, chiral_fisherr2_tdep, chiral_fisherr2_tend, chiral_fisherr2_tstart, chiral_list, chiral_reaction, cutoffyy_chiral, del2xx_chiral, del2yy_chiral, del2zz_chiral, enum_chiral_reaction, gradx0, grady0, gxx_chiral, gyy_chiral, gzz_chiral, idiag_bmaxep, idiag_brmsep, idiag_jbmep, idiag_jmaxep, idiag_jrmsep, idiag_qq21m_chiral, idiag_qq21qqm_chiral, idiag_qqm_chiral, idiag_r2tdep, idiag_xx_chiralm, idiag_xx_chiralmax, idiag_yy_chiralm, idiag_yy_chiralmax, idiag_zz_chiralm, idiag_zz_chiralmax, initpoweryy_chiral, initxx_chiral, inityy_chiral, initzz_chiral, ixx2_chiral, ixx_chiral, iyy2_chiral, iyy_chiral, izz_chiral, kx_xx_chiral, kx_yy_chiral, ky_xx_chiral, ky_yy_chiral, kz_xx_chiral, kz_yy_chiral, limposed_gradient, linitialize_aa_from_ep, linitialize_aa_from_ep_alpgrad, linitialize_aa_from_ep_betgrad, llorentzforceep, lupw_chiral, lzz_chiral, qq, radiusxx_chiral, radiusyy_chiral, tinitialize_aa_from_ep, widthxx_chiral, widthyy_chiral, widthzz_chiral, xposxx_chiral, xposyy_chiral, yposxx_chiral, yposyy_chiral, zposxx_chiral, zposyy_chiral

Routines:

calc_diagnostics_chiral(), calc_pencils_chiral(), chiral_before_boundary(), dxy_chiral_dt(), get_slices_chiral(), init_chiral(), initialize_chiral(), pencil_criteria_chiral(), pencil_interdep_chiral(), read_chiral_init_pars(), read_chiral_run_pars(), register_chiral(), rprint_chiral(), write_chiral_init_pars(), write_chiral_run_pars()

Needed modules

Variables

  • chiral/ixx2_chiral [integer,public/optional/default=0]
  • chiral/ixx_chiral [integer,public/optional/default=0]
  • chiral/iyy2_chiral [integer,public/optional/default=0]
  • chiral/iyy_chiral [integer,public/optional/default=0]

Subroutines and functions

subroutine  chiral/register_chiral()

28-may-04/axel: adapted from pscalar

Use :

messages (svn_id())

Called from:

register_modules()

Call to:

svn_id()

subroutine  chiral/initialize_chiral(f)

28-may-04/axel: adapted from pscalar

Parameters:

f (mx,my,mz,mfarray) [real]

Called from:

register_modules(), initialize_modules()

subroutine  chiral/init_chiral(f)
Parameters:

f (mx,my,mz,mfarray) [real]

Called from:

start

subroutine  chiral/pencil_criteria_chiral()

21-11-04/anders: coded

Called from:

register_modules(), initialize_modules(), finalize_modules(), choose_pencils()

subroutine  chiral/pencil_interdep_chiral(lpencil_in)

21-11-04/anders: coded

Parameters:

lpencil_in (npencils) [logical]

Called from:

register_modules(), initialize_modules(), finalize_modules(), choose_pencils()

subroutine  chiral/calc_pencils_chiral(f, p)

21-11-04/anders: coded

Parameters:
Called from:

pde(), write_diagnostics(), calc_all_module_diagnostic_auxiliaries(), perform_diagnostics(), finalize_diagnostics()

subroutine  chiral/dxy_chiral_dt(f, df, p)

passive scalar evolution calculate dc/dt=-uu.gcc + pscaler_diff*[del2cc + glnrho.gcc]

28-may-04/axel: adapted from pscalar

Parameters:
Called from:

pde(), write_diagnostics(), calc_all_module_diagnostic_auxiliaries(), perform_diagnostics(), finalize_diagnostics()

subroutine  chiral/calc_diagnostics_chiral(f, p)
Parameters:
Called from:

pde(), write_diagnostics(), calc_all_module_diagnostic_auxiliaries()

subroutine  chiral/chiral_before_boundary(f)

dummy routine

4-jul-09/axel: coded

Parameters:

f (mx,my,mz,mfarray) [real,inout]

Called from:

pde(), write_diagnostics(), calc_all_module_diagnostic_auxiliaries(), perform_diagnostics(), finalize_diagnostics()

subroutine  chiral/read_chiral_init_pars(iomsg)
Parameters:

iomsg [character,out]

subroutine  chiral/write_chiral_init_pars(unit)
Parameters:

unit [integer,in]

Called from:

get_datadir(), get_snapdir(), read_all_init_pars(), read_all_run_pars(), get_downpars()

subroutine  chiral/read_chiral_run_pars(iomsg)
Parameters:

iomsg [character,out]

subroutine  chiral/write_chiral_run_pars(unit)
Parameters:

unit [integer,in]

Called from:

get_datadir(), get_snapdir(), read_all_init_pars(), read_all_run_pars(), get_downpars()

subroutine  chiral/rprint_chiral(lreset[, lwrite])

28-may-04/axel: adapted from pscalar

Parameters:

  • lreset [logical]

  • lwrite [logical]

Called from:

register_modules(), initialize_modules(), finalize_modules(), choose_pencils(), rprint_list()

subroutine  chiral/get_slices_chiral(f, slices)

26-jun-06/tony: dummy

Parameters:
Called from:

wvid_prepare(), wvid()