nointerstellar

Module

Description

$Id$

Dummy module.

** 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 :: linterstellar = .false.

PENCILS PROVIDED heat; cool; heatcool


Quick access

Types:

explosionsite

Variables:

calc_diagnostics_interstellar, calc_heat_cool_interstellar, calc_pencils_interstellar, explosionsite, get_slices_interstellar, init_interstellar, initialize_interstellar, input_persistent_interstellar, interstellar_after_boundary, interstellar_before_boundary, output_persistent_interstellar, pencil_criteria_interstellar, pencil_interdep_interstellar, read_interstellar_init_pars, read_interstellar_run_pars, register_interstellar, rprint_interstellar, write_interstellar_init_pars, write_interstellar_run_pars

Routines:

calc_diagnostics_interstellar(), calc_heat_cool_interstellar(), calc_pencils_interstellar(), get_slices_interstellar(), init_interstellar(), initialize_interstellar(), input_persistent_interstellar(), interstellar_after_boundary(), interstellar_before_boundary(), output_persistent_interstellar(), pencil_criteria_interstellar(), pencil_interdep_interstellar(), read_interstellar_init_pars(), read_interstellar_run_pars(), register_interstellar(), rprint_interstellar(), write_interstellar_init_pars(), write_interstellar_run_pars()

Needed modules

Variables

Subroutines and functions

subroutine  interstellar/register_interstellar()

19-nov-02/tony: coded

identify version number

Called from:

register_modules()

Call to:

svn_id(), output_persistent_interstellar()

subroutine  interstellar/initialize_interstellar(f)

Perform any post-parameter-read initialization eg. set derived parameters

24-nov-02/tony: coded - dummy

Parameters:

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

Called from:

register_modules(), initialize_modules()

Call to:

output_persistent_interstellar()

subroutine  interstellar/input_persistent_interstellar([id[, done]])

Read in the stored time of the next SNI

Parameters:
  • id [integer]

  • done [logical]

Called from:

input_persistent()

Call to:

output_persistent_interstellar()

function  interstellar/output_persistent_interstellar()

Writes out the time of the next SNI

Return:

output_persistent_interstellar [logical]

Called from:

register_interstellar(), initialize_interstellar(), input_persistent_interstellar(), input_persistent(), output_persistent()

subroutine  interstellar/rprint_interstellar(lreset[, lwrite])

reads and registers print parameters relevant to interstellar

1-jun-02/axel: adapted from magnetic fields

Parameters:
  • lreset [logical]

  • lwrite [logical]

Called from:

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

subroutine  interstellar/get_slices_interstellar(f, slices)
Parameters:
Called from:

wvid_prepare(), wvid()

subroutine  interstellar/read_interstellar_init_pars(iomsg)
Parameters:

iomsg [character,out]

subroutine  interstellar/write_interstellar_init_pars(unit)
Parameters:

unit [integer,in]

Called from:

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

subroutine  interstellar/read_interstellar_run_pars(iomsg)
Parameters:

iomsg [character,out]

subroutine  interstellar/write_interstellar_run_pars(unit)
Parameters:

unit [integer,in]

Called from:

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

subroutine  interstellar/init_interstellar(f)

initialise magnetic field; called from start.f90 30-jul-2006/tony: dummy routine

Parameters:

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

Called from:

start

subroutine  interstellar/pencil_criteria_interstellar()

All pencils that the Interstellar module depends on are specified here.

26-03-05/tony: coded

Called from:

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

subroutine  interstellar/pencil_interdep_interstellar(lpencil_in)

Interdependency among pencils from the Entropy module is specified here.

20-11-04/anders: coded

Parameters:

lpencil_in (npencils) [logical]

subroutine  interstellar/calc_pencils_interstellar(f, p)

Calculate Interstellar pencils. Most basic pencils should come first, as others may depend on them.

Parameters:
Called from:

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

subroutine  interstellar/calc_diagnostics_interstellar(p)
Parameters:

p [pencil_case]

Called from:

pde(), write_diagnostics(), calc_all_module_diagnostic_auxiliaries()

subroutine  interstellar/interstellar_after_boundary(f)

This routine calculates and applies the optically thin cooling function together with UV heating.

01-aug-06/tony: coded

Parameters:

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

subroutine  interstellar/interstellar_before_boundary(f)

This routine calculates and applies the optically thin cooling function together with UV heating.

01-aug-06/tony: coded

Parameters:

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

Called from:

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

subroutine  interstellar/calc_heat_cool_interstellar(f, df, p, hmax)

adapted from calc_heat_cool

Parameters: