solver_stats_t Derived Type

type, public :: solver_stats_t

Dummy/diagnostic solver statistics structure mirroring the one in flow. Keeping structural declarations isolated or shared if needed.


Components

Type Visibility Attributes Name Initial
real(kind=rk), public :: cfl = zero
real(kind=rk), public :: kinetic_energy = zero
real(kind=rk), public :: max_divergence = zero
real(kind=rk), public :: max_velocity = zero
real(kind=rk), public :: min_species_y = zero
real(kind=rk), public :: net_boundary_flux = zero
integer, public :: pressure_iterations = 0
real(kind=rk), public :: pressure_iterations_avg = zero
integer, public :: pressure_iterations_max = 0
integer, public :: pressure_iterations_total = 0
real(kind=rk), public :: pressure_residual = zero
real(kind=rk), public :: pressure_residual_abs = zero
integer, public :: pressure_solve_count = 0
real(kind=rk), public :: rms_divergence = zero
real(kind=rk), public :: total_mass = zero
real(kind=rk), public :: wall_time = zero

Source Code

   type, public :: solver_stats_t
      integer :: pressure_iterations = 0
      integer :: pressure_iterations_total = 0
      integer :: pressure_iterations_max = 0
      integer :: pressure_solve_count = 0
      real(rk) :: pressure_iterations_avg = zero
      real(rk) :: pressure_residual = zero      !< Relative PCG residual sqrt(r.r/r0.r0).
      real(rk) :: pressure_residual_abs = zero  !< Absolute RMS PCG residual sqrt(r.r/N).
      real(rk) :: max_divergence = zero
      real(rk) :: rms_divergence = zero
      real(rk) :: net_boundary_flux = zero
      real(rk) :: kinetic_energy = zero
      real(rk) :: cfl = zero
      real(rk) :: wall_time = zero
      real(rk) :: max_velocity = zero
      real(rk) :: total_mass = zero
      real(rk) :: min_species_y = zero
   end type solver_stats_t