nopointmasses

Module

Description

$Id$

This module takes care of direct N-body gravity between point masses.

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

Quick access

Types:

indexdustparticles

Variables:

accrete_hills_frac, bcqx, bcqy, bcqz, cdtq, dfq, dfq_cart, eccentricity, final_ramped_mass, fq, frac_smooth, gnewton1, hills_tempering_fraction, imass, indexdustparticles, initvvq, initxxq, ipotential_pointmass, iprimary, isecondary, ivpx_cart, ivpy_cart, ivpz_cart, ivxq, ivyq, ivzq, ixq, iyq, izq, l2d, l3d, laccretion, ladd_dragforce, lcentrifugal_force_pointmass, lcoriolis_force_pointmass, lcorrect_gasgravity_lstart, lcylindrical_gravity_nbody, ldt_pointmasses, ldust, ldust_gravity, lexclude_frozen, lexclude_hills, lfollow_particle, lgas_gravity, lgas_removal, llinear_drag, llive_secondary, lmomentum_removal, lnogravz_star, lnorm, lnoselfgrav_primary, lquadratic_drag, lramp, lreset_cm, lretrograde, lshear_accel_pointmass, nqvar, pmass, pmass1, qvarname, r1_smooth, r_smooth, ramp_orbits, semimajor_axis, st1, stokesnumber, tau_accretion, totmass, totmass1, ugas, vxq0, vyq0, vzq0, xq0, yq0, zq0

Routines:

boundconds_pointmasses(), calc_diagnostics_pointmasses(), calc_pencils_pointmasses(), init_pointmasses(), initialize_pointmasses(), pencil_criteria_pointmasses(), pencil_interdep_pointmasses(), pointmasses_pde(), pointmasses_pde_pencil(), pointmasses_read_snapshot(), pointmasses_timestep_first(), pointmasses_timestep_second(), pointmasses_write_qdim(), pointmasses_write_snapshot(), read_pointmasses_init_pars(), read_pointmasses_run_pars(), register_pointmasses(), rprint_pointmasses(), write_pointmasses_init_pars(), write_pointmasses_run_pars()

Needed modules

Variables

Subroutines and functions

subroutine  pointmasses/register_pointmasses()

Set up indices for access to the f and fq.

27-aug-06/wlad: adapted

Called from:

register_modules()

Call to:

svn_id()

subroutine  pointmasses/initialize_pointmasses(f)
Parameters:

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

Called from:

register_modules(), initialize_modules()

subroutine  pointmasses/pencil_criteria_pointmasses()
Called from:

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

subroutine  pointmasses/pencil_interdep_pointmasses(lpencil_in)

Interdependency among pencils provided by the pointmasses module is specified here.

22-sep-06/wlad: adapted

Parameters:

lpencil_in (npencils) [logical]

Called from:

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

subroutine  pointmasses/calc_pencils_pointmasses(f, p)

Calculate point mass particle pencils

22-sep-06/wlad: adapted

Parameters:
Called from:

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

subroutine  pointmasses/init_pointmasses(f)

Initial positions and velocities of point mass particles. Overwrite the position asserted by the dust module

17-nov-05/anders+wlad: adapted

Parameters:

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

Use :

general (random_number_wrapper()), sub, mpicomm (mpibcast_real())

Called from:

start

subroutine  pointmasses/pointmasses_pde_pencil(f, df, p)
Parameters:
Called from:

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

subroutine  pointmasses/pointmasses_pde(f, df)
Parameters:
Called from:

pde()

subroutine  pointmasses/calc_diagnostics_pointmasses(p)
Parameters:

p [pencil_case]

Called from:

pde(), write_diagnostics(), calc_all_module_diagnostic_auxiliaries()

subroutine  pointmasses/read_pointmasses_init_pars(iomsg)
Parameters:

iomsg [character,out]

subroutine  pointmasses/write_pointmasses_init_pars(unit)
Parameters:

unit [integer,in]

Called from:

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

subroutine  pointmasses/read_pointmasses_run_pars(iomsg)
Parameters:

iomsg [character,out]

subroutine  pointmasses/write_pointmasses_run_pars(unit)
Parameters:

unit [integer,in]

Called from:

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

subroutine  pointmasses/get_totalmass(tmass)
Parameters:

tmass [real]

subroutine  pointmasses/pointmasses_read_snapshot(filename)
Parameters:

filename [character]

Called from:

helper_loop(), reload(), gen_output(), timeloop(), check_tspec_crit_log_interval(), check_tsnap_crit_log_interval(), check_tvid_crit_log_interval(), setup_signal_files(), print_metrics(), run_start()

subroutine  pointmasses/pointmasses_write_snapshot(file, enum[, flist])
Parameters:

  • file [character]

  • enum [logical]

  • flist [character]

Called from:

helper_loop(), reload(), gen_output(), timeloop(), check_tspec_crit_log_interval(), check_tsnap_crit_log_interval(), check_tvid_crit_log_interval(), setup_signal_files(), print_metrics(), run_start(), start

subroutine  pointmasses/pointmasses_write_qdim(filename)
Parameters:

filename [character]

Called from:

start

subroutine  pointmasses/rprint_pointmasses(lreset[, lwrite])
Parameters:

  • lreset [logical]

  • lwrite [logical]

Called from:

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

subroutine  pointmasses/boundconds_pointmasses()
Called from:

pde()

subroutine  pointmasses/pointmasses_timestep_first(f)
Parameters:

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

subroutine  pointmasses/pointmasses_timestep_second(f)
Parameters:

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