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

Symmetrize \(R\), \(Z\) and \(\lambda\). More...

Go to the source code of this file.

Functions/Subroutines

subroutine symrzl (r1s, rus, rvs, z1s, zus, zvs, lus, lvs, rcons, zcons, r1a, rua, rva, z1a, zua, zva, lua, lva, rcona, zcona)
 Symmetrize \(R\), \(Z\) and \(\lambda\).
 

Detailed Description

Symmetrize \(R\), \(Z\) and \(\lambda\).

Definition in file symrzl.f90.

Function/Subroutine Documentation

◆ symrzl()

subroutine symrzl ( real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) r1s,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) rus,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) rvs,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) z1s,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) zus,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) zvs,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) lus,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) lvs,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) rcons,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(inout) zcons,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) r1a,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) rua,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) rva,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) z1a,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) zua,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) zva,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) lua,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) lva,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) rcona,
real(rprec), dimension(ns*nzeta,ntheta3,0:1), intent(in) zcona )

Symmetrize \(R\), \(Z\) and \(\lambda\).

Parameters
r1s
rus
rvs
z1s
zus
zvs
lus
lvs
rcons
zcons
r1a
rua
rva
z1a
zua
zva
lua
lva
rcona
zcona

Definition at line 26 of file symrzl.f90.

References vmec_main::ireflect, and vmec_main::lthreed.

Referenced by funct3d().

Here is the caller graph for this function: