State variables for a Gradient descent minimizer
| 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 |
TYPE, EXTENDS(a_minimizer_vars) :: t_gradient_descent_vars END TYPE t_gradient_descent_vars