V3FIT
|
Module contained subroutines and functions updating MHD forces and Wmhd. More...
Functions/Subroutines | |
subroutine | funct_island |
Parallel/Serial routine to compute forces for perturbed state. More... | |
subroutine | getfsq (fsqout) |
real(dp) function | getwmhd (p) |
Returns perturbed MHD+KINETIC energy. More... | |
subroutine | linesearch (xcmin, fsq_min) |
Performs line search along xc vector for minimum fsq_total1. More... | |
subroutine | init_ptrs (xtarget, ptr1, ptr2, ptr3, ptr4, ptr5, ptr6) |
Initializes pointers for xc (displacement variables) and gc (force) arrays. More... | |
Variables | |
integer, private | nsmin |
integer, private | nsmax |
Module contained subroutines and functions updating MHD forces and Wmhd.
subroutine shared_functions::funct_island |
Parallel/Serial routine to compute forces for perturbed state.
Definition at line 26 of file shared_functions.f90.
real(dp) function shared_functions::getwmhd | ( | real(dp), dimension(neqs), intent(in) | p | ) |
Returns perturbed MHD+KINETIC energy.
[in] | p | displacement vector |
Definition at line 181 of file shared_functions.f90.
subroutine shared_functions::init_ptrs | ( | real(dp), dimension(0:mpol,-ntor:ntor,ndims,ns), intent(in), target | xtarget, |
real(dp), dimension(:,:,:), pointer | ptr1, | ||
real(dp), dimension(:,:,:), pointer | ptr2, | ||
real(dp), dimension(:,:,:), pointer | ptr3, | ||
real(dp), dimension(:,:,:), pointer | ptr4, | ||
real(dp), dimension(:,:,:), pointer | ptr5, | ||
real(dp), dimension(:,:,:), pointer | ptr6 | ||
) |
Initializes pointers for xc (displacement variables) and gc (force) arrays.
[in] | xtarget | input 3D, ndims-component arrays |
ptr4 | 1st (s) array subsection (lasym=F,T) | |
ptr5 | 2nd (u) array subsection | |
ptr6 | 3rd (v) array subsection |
Definition at line 263 of file shared_functions.f90.
subroutine shared_functions::linesearch | ( | real(dp), dimension(neqs), intent(inout) | xcmin, |
real(dp), intent(inout) | fsq_min | ||
) |
Performs line search along xc vector for minimum fsq_total1.
Definition at line 209 of file shared_functions.f90.