a_minimizer_vars Derived Type

type, public, ABSTRACT :: a_minimizer_vars


Inherits

type~~a_minimizer_vars~~InheritsGraph type~a_minimizer_vars a_minimizer_vars type~t_sol_var_mhd3d t_sol_var_MHD3D type~a_minimizer_vars->type~t_sol_var_mhd3d dofs, force, temp_dofs type~c_sol_var c_sol_var type~t_sol_var_mhd3d->type~c_sol_var

Inherited by

type~~a_minimizer_vars~~InheritedByGraph type~a_minimizer_vars a_minimizer_vars type~t_accelerated_gradient_descent_vars t_accelerated_gradient_descent_vars type~t_accelerated_gradient_descent_vars->type~a_minimizer_vars type~t_gradient_descent_vars t_gradient_descent_vars type~t_gradient_descent_vars->type~a_minimizer_vars type~t_minimizer_mhd3d t_minimizer_mhd3d type~t_minimizer_mhd3d->type~a_minimizer_vars vars type~t_functional_mhd3d t_functional_mhd3d type~t_functional_mhd3d->type~t_minimizer_mhd3d minimizer

Components

Type Visibility Attributes Name Initial
character(len=40), public :: MinimizerType

defines the minimization algorithm: 0 = Gradient-Descent, 10 = Accelerated Gradient-Descent
logical, public :: restart_iter
logical, public :: logger_is_initialized
integer, public :: JacCheck

switch for restarts, if detJ<0 JacCheck<=-1
integer, public :: iter
integer, public :: nStepDecreased
integer, public :: nSkip_Jac
integer, public :: nSkip_dw
integer, public :: lastoutputIter
integer, public :: logiter_ramp
integer, public :: logscreen
real(kind=wp), public :: dt
real(kind=wp), public :: deltaW
real(kind=wp), public :: dW_allowed
real(kind=wp), public :: t_pseudo
real(kind=wp), public :: Fnorm(3)
real(kind=wp), public :: Fnorm0(3)
real(kind=wp), public :: Fnorm_old(3)
real(kind=wp), public :: W_MHD3D_0
real(kind=wp), public :: min_dt_out
real(kind=wp), public :: max_dt_out
real(kind=wp), public :: min_dw_out
real(kind=wp), public :: max_dw_out
real(kind=wp), public :: sum_dW_out
logical, public :: DoCheckDistance
logical, public :: DoCheckAxis
integer, public :: outputIter
integer, public :: nlogScreen
integer, public :: logIter
integer, public :: logUnit
integer, public :: StartTimeArray(8)
type(t_sol_var_MHD3D), public, ALLOCATABLE :: dofs(:)

degrees of freedom at levels (k-1),(k),(k+1)
type(t_sol_var_MHD3D), public, ALLOCATABLE :: force(:)

force
type(t_sol_var_MHD3D), public, ALLOCATABLE :: temp_dofs(:)

temporary for update

Source Code

    TYPE, ABSTRACT :: a_minimizer_vars
        CHARACTER(LEN=40) :: MinimizerType !! defines the minimization algorithm: 0 = Gradient-Descent, 10 = Accelerated Gradient-Descent
        LOGICAL   :: restart_iter, logger_is_initialized
        INTEGER   :: JacCheck !! switch for restarts, if detJ<0 JacCheck<=-1
        INTEGER   :: iter,nStepDecreased,nSkip_Jac,nSkip_dw
        INTEGER   :: lastoutputIter, logiter_ramp, logscreen
        REAL(wp)  :: dt,deltaW, dW_allowed
        REAL(wp)  :: t_pseudo,Fnorm(3),Fnorm0(3),Fnorm_old(3),W_MHD3D_0

        ! Logging variables
        REAL(wp) :: min_dt_out,max_dt_out,min_dw_out,max_dw_out,sum_dW_out
        LOGICAL  :: DoCheckDistance, DoCheckAxis
        INTEGER  :: outputIter, nlogScreen, logIter, logUnit, StartTimeArray(8)

        TYPE(t_sol_var_MHD3D), ALLOCATABLE :: dofs(:)      !! degrees of freedom at levels (k-1),(k),(k+1)
        TYPE(t_sol_var_MHD3D), ALLOCATABLE :: force(:)     !! force
        TYPE(t_sol_var_MHD3D), ALLOCATABLE :: temp_dofs(:) !! temporary for update
    END TYPE a_minimizer_vars