csplinx.f

      MODULE csplinx
      USE stel_kinds
      IMPLICIT NONE
C-----------------------------------------------
C   L o c a l   V a r i a b l e s
C-----------------------------------------------
      INTEGER :: nptsx
      REAL(rprec), DIMENSION(:), ALLOCATABLE :: rmidx,hmidx,
     1   wmidx,qmidx,tenmidx,ymidx,y2midx
c-----------------------------------------------
      END MODULE csplinx