V3FIT
v3f_vmec_comm.f
1 !*******************************************************************************
2 ! File v3f_vmec_comm.f
3 !
4 ! Module is part of the LIBSTELL. This modules facilitates communication
5 ! between v3fit and vmec non global variables.
6 !
7 !*******************************************************************************
8 
9  MODULE v3f_vmec_comm
10  USE stel_kinds
11  IMPLICIT NONE
12 
13 !*******************************************************************************
14 ! Module variables.
15 !*******************************************************************************
16  REAL(rprec) :: vvc_smaleli ! Internal Inductance
17  REAL(rprec) :: vvc_kappa_p ! Mean Elongation
18 
19  END MODULE
20