V3FIT
VMEC2000
Sources
General
vmec_persistent.f
1
MODULE
vmec_persistent
2
USE
stel_kinds,
ONLY
: rprec
3
IMPLICIT NONE
4
C-----------------------------------------------
5
C L o c a l V a r i a b l e s
6
C-----------------------------------------------
7
INTEGER
,
DIMENSION(:)
,
ALLOCATABLE
:: ixm, jmin3
8
REAL
(rprec),
DIMENSION(:,:)
,
ALLOCATABLE
:: cosmu, sinmu,
9
1 cosmum, sinmum, cosmumi, sinmumi,
10
2 cosnv, sinnv, cosnvn, sinnvn
11
REAL
(rprec),
DIMENSION(:,:)
,
ALLOCATABLE
:: cosmui, sinmui,
12
1 cosmui3, cosmumi3
13
REAL
(rprec),
DIMENSION(:)
,
ALLOCATABLE
,
TARGET
::
14
1 xm, xn, xm_nyq, xn_nyq
15
REAL
(rprec),
DIMENSION(:)
,
ALLOCATABLE
:: cos01, sin01
16
c-----------------------------------------------
17
END MODULE
vmec_persistent
Generated on Thu Mar 5 2020 15:49:26 for V3FIT by
1.8.17