V3FIT
csplinx.f
1  MODULE csplinx
2  USE stel_kinds
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 :: nptsx
8  REAL(rprec), DIMENSION(:), ALLOCATABLE :: rmidx,hmidx,
9  1 wmidx,qmidx,tenmidx,ymidx,y2midx
10 c-----------------------------------------------
11  END MODULE csplinx