find_print_surfaces Module Procedure

module procedure find_print_surfaces module subroutine find_print_surfaces(this)

Uses

  • proc~~find_print_surfaces~~UsesGraph proc~find_print_surfaces find_print_surfaces module~utility utility proc~find_print_surfaces->module~utility constants constants module~utility->constants matrix matrix module~utility->matrix

Finds the surfaces of the stars, and prints them to a formatted file.

FT 18.02.2022

Arguments

Type IntentOptional Attributes Name
class(bnsbase), intent(inout) :: this

bnsbase object owning this PROCEDURE

Called by

proc~~find_print_surfaces~~CalledByGraph proc~find_print_surfaces find_print_surfaces interface~find_print_surfaces find_print_surfaces interface~find_print_surfaces->proc~find_print_surfaces

Contents

Variables


Variables

Type Visibility Attributes Name Initial
logical, private :: exist
character(len=:), private, ALLOCATABLE :: finalnamefile
integer, private :: i
integer, private :: i_matter
integer, private :: ios
integer, private :: j
integer, private :: n_matter
integer, private, parameter :: n_phi = 360
integer, private, parameter :: n_theta = 180
character(len=3), private :: str_i
integer, private, parameter :: unit_dump = 2764