VMEC 8.52
3D Equilibrium solver with nested flux surfaces.
Loading...
Searching...
No Matches
symoutput.f90 File Reference

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 (?)
 

Detailed Description

Symmetrize some quantities so that they can be output (?)

Definition in file symoutput.f90.

Function/Subroutine Documentation

◆ symoutput()

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 (?)

Parameters
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().

Here is the caller graph for this function: