read_density Subroutine

public subroutine read_density(file, scn_density, plus_density)

Reads the density of each component from the input file and calculated molar volume since C6 fraction.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: file

file name
real(kind=pr), intent(out), allocatable :: scn_density(:)

set of corresponding densities of scn cuts
real(kind=pr), intent(out) :: plus_density

density of residual fraction from input file

Calls

proc~~read_density~~CallsGraph proc~read_density read_density proc~read_setup read_setup proc~read_density->proc~read_setup

Called by

proc~~read_density~~CalledByGraph proc~read_density read_density proc~data_from_file data_from_file proc~data_from_file->proc~read_density proc~characterize characterize proc~characterize->proc~data_from_file

Variables

Type Visibility Attributes Name Initial
integer, public :: def_comp_nc

number of defined components being considered in the oil
integer, public :: funit
integer, public :: numbers_ps

number of pseudos in which the scn fractions grouped
integer, public :: scn_nc

number of single cuts being considered in the oil
integer, public :: scn_nc_ps

CN from which all SCN fractions will be lumped into the specified number of pseudos

Namelists

Namelist nml_density


Variables

Name Type Default Description
scn_density real(kind=pr) None

set of corresponding densities of scn cuts
plus_density real(kind=pr) None

density of residual fraction from input file