Main program magic.f90
¶
-
program
magic
¶ A dynamic dynamo model driven by thermal convection in a rotating spherical fluid shell. This version can solve for both Boussinesq and anelastic fluids and non-dimensional variables are used throughout the whole code.
- Use
iso_fortran_env
,charmanip
(write_long_string()
),truncation
,precision_mod
,physical_parameters
,courant_mod
(initialize_courant()
,finalize_courant()
),radial_der
(initialize_der_arrays()
,finalize_der_arrays()
),radial_functions
(initialize_radial_functions()
,finalize_radial_functions()
),num_param
,torsional_oscillations
,init_fields
,blocking
(initialize_blocking()
,finalize_blocking()
,llm()
,ulm()
),timing
(timer_type()
),horizontal_data
,logic
,fields
,fieldslast
,constants
(codeversion()
),movie_data
(initialize_movie_data()
,finalize_movie_data()
),rms
(initialize_rms()
,finalize_rms()
),dtb_mod
(initialize_dtb_mod()
,finalize_dtb_mod()
),radial_data
(initialize_radial_data()
,finalize_radial_data()
),radialloop
(initialize_radialloop()
,finalize_radialloop()
),lmloop_mod
(initialize_lmloop()
,finalize_lmloop()
,test_lmloop()
),precalculations
,start_fields
(getstartfields()
),kinetic_energy
,magnetic_energy
,fields_average_mod
,geos
(initialize_geos()
,finalize_geos()
),spectra
(initialize_spectra()
,finalize_spectra()
),output_data
(tag()
,log_file()
,n_log_file()
),output_mod
(initialize_output()
,finalize_output()
),outto_mod
(initialize_outto_mod()
,finalize_outto_mod()
),parallel_mod
,namelists
,step_time_mod
(initialize_step_time()
,step_time()
),communications
(initialize_communications()
,finalize_communications()
),power
(initialize_output_power()
,finalize_output_power()
),outpar_mod
(initialize_outpar_mod()
,finalize_outpar_mod()
),outmisc_mod
(initialize_outmisc_mod()
,finalize_outmisc_mod()
),outrot
(initialize_outrot()
,finalize_outrot()
),mem_alloc
,useful
(abortrun()
),probe_mod
(initialize_probes()
,finalize_probes()
),time_schemes
(type_tscheme()
),sht
(initialize_sht()
,finalize_sht()
)- Call to
parallel()
,write_long_string()
,readnamelists()
,initialize_output()
,checktruncation()
,initialize_memory_counter()
,initialize_blocking()
,initialize_sht()
,initialize_radial_data()
,initialize_radial_functions()
,initialize_horizontal_data()
,memwrite()
,initialize_radialloop()
,initialize_lmloop()
,initialize_num_param()
,initialize_init_fields()
,initialize_fields()
,initialize_fieldslast()
,initialize_step_time()
,initialize_communications()
,initialize_der_arrays()
,initialize_kinetic_energy()
,initialize_magnetic_energy()
,initialize_spectra()
,initialize_outpar_mod()
,initialize_outmisc_mod()
,initialize_outrot()
,initialize_output_power()
,initialize_fields_average_mod()
,initialize_to()
,precalc()
,initialize_outto_mod()
,initialize_movie_data()
,initialize_geos()
,initialize_dtb_mod()
,initialize_probes()
,initialize_rms()
,finalize_memory_counter()
,writenamelists()
,getstartfields()
,initialize_courant()
,precalctimes()
,writeinfo()
,test_lmloop()
,step_time()
,finalize_movie_data()
,finalize_rms()
,finalize_outto_mod()
,finalize_to()
,finalize_geos()
,finalize_dtb_mod()
,finalize_fields_average_mod()
,finalize_output_power()
,finalize_outrot()
,finalize_outmisc_mod()
,finalize_outpar_mod()
,finalize_spectra()
,finalize_magnetic_energy()
,finalize_kinetic_energy()
,finalize_probes()
,finalize_courant()
,finalize_communications()
,finalize_fieldslast()
,finalize_fields()
,finalize_init_fields()
,finalize_num_param()
,finalize_lmloop()
,finalize_radialloop()
,finalize_sht()
,finalize_der_arrays()
,finalize_horizontal_data()
,finalize_radial_functions()
,finalize_blocking()
,finalize_radial_data()
,finalize_output()