detonate

Module

Description

$Id$

This module searches for gravitationally collapsing sites and detonates them.

** 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 :: ldetonate = .true.

MAUX CONTRIBUTION 1 COMMUNICATED AUXILIARIES 1

Quick access

Variables:

collapsing, derivative, det_factor, det_njeans, det_nsmooth, det_radius, det_scale, deth0, idiag_detn, idiag_dettot, jeans, jeans_unstable, mask_sphere, nxg, nyg, nzg, power, set_detonations, total_energy

Routines:

detonate_before_boundary(), initialize_detonate(), read_detonate_run_pars(), register_detonate(), rprint_detonate(), write_detonate_run_pars()

Needed modules

Variables

  • detonate/collapsing [private]
  • detonate/derivative [private]
  • detonate/det_factor [real,private/optional/default=1.0]
  • detonate/det_njeans [integer,private/optional/default=4]
  • detonate/det_nsmooth [integer,private/optional/default=1]
  • detonate/det_radius [integer,private/optional/default=2]
  • detonate/det_scale [character,private/optional/default='linear']
  • detonate/deth0 [real,private/optional/default=0.0]
  • detonate/idiag_detn [integer,private/optional/default=0]
  • detonate/idiag_dettot [integer,private/optional/default=0]
  • detonate/jeans [real,private/optional/default=0.0]
  • detonate/jeans_unstable [private]
  • detonate/mask_sphere (1 + 2 * nghost,1 + 2 * nghost,1 + 2 * nghost) [logical,private/optional/default=.false.]
  • detonate/nxg [integer,private/optional/default=0]
  • detonate/nyg [integer,private/optional/default=0]
  • detonate/nzg [integer,private/optional/default=0]
  • detonate/power [integer,private/optional/default=0]
  • detonate/set_detonations [private]
  • detonate/tgentle [real,private/optional/default=0.0]
  • detonate/total_energy [private]

Subroutines and functions

subroutine  detonate/register_detonate()

Set up indices for variables.

06-feb-14/ccyang: coded

Use :

farraymanager (farray_register_auxiliary())

Call to:

svn_id(), fatal_error(), get_gamma_etc(), update_ghosts(), smooth()

subroutine  detonate/initialize_detonate(f)

Initializes module specific variables for later use.

14-feb-14/ccyang: coded

Parameters:

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

Use :

general (keep_compiler_quiet()), equationofstate (cs20(), get_gamma_etc()), sharedvariables (get_shared_variable())

Call to:

fatal_error(), get_gamma_etc(), update_ghosts(), smooth()

subroutine  detonate/read_detonate_run_pars(iomsg)
Parameters:

iomsg [character,out]

Use :

file_io (parallel_unit())

Call to:

update_ghosts(), smooth()

subroutine  detonate/write_detonate_run_pars(unit)
Parameters:

unit [integer,in]

Call to:

update_ghosts(), smooth()

subroutine  detonate/rprint_detonate(lreset[, lwrite])

Reads and registers print parameters.

06-feb-14/ccyang: dummy

Parameters:

  • lreset [logical,in]

  • lwrite [logical,in,]

Use :

diagnostics (parse_name()), general (keep_compiler_quiet())

Call to:

update_ghosts(), smooth()

subroutine  detonate/detonate_before_boundary(f)

Possibility to modify the f before boundary conmmunications.

14-feb-14/ccyang: coded

Parameters:

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

Use :

boundcond (zero_ghosts(), update_ghosts()), diagnostics (sum_mn_name()), mpicomm (mpiallreduce_or(), mpireduce_sum_int(), mpireduce_sum())

Call to:

update_ghosts(), smooth()