VMEC 8.52
3D Equilibrium solver with nested flux surfaces.
|
Symmetrize some quantities so that they can be output (?) More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | symoutput (bsq, gsqrt, bsubu, bsubv, bsupu, bsupv, bsubs, bsqa, gsqrta, bsubua, bsubva, bsupua, bsupva, bsubsa) |
Symmetrize some quantities so that they can be output (?) | |
Symmetrize some quantities so that they can be output (?)
Definition in file symoutput.f90.
subroutine symoutput | ( | real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | bsq, |
real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | gsqrt, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | bsubu, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | bsubv, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | bsupu, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | bsupv, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(inout) | bsubs, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | bsqa, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | gsqrta, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | bsubua, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | bsubva, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | bsupua, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | bsupva, | ||
real(rprec), dimension(ns*nzeta,ntheta3), intent(out) | bsubsa ) |
Symmetrize some quantities so that they can be output (?)
bsq | |
gsqrt | |
bsubu | |
bsubv | |
bsupu | |
bsupv | |
bsubs | |
bsqa | |
gsqrta | |
bsubua | |
bsubva | |
bsupua | |
bsupva | |
bsubsa |
Definition at line 20 of file symoutput.f90.
References vmec_main::ireflect.
Referenced by wrout().