SimulationCore2/CSharp/BasicInputs/WellProfile/CPathGenerationVariables.f90

module CPathGenerationVariables
    implicit none
    public
    
    ! types
    type, bind(c), public :: CPathGenerationItem
        integer :: HoleType
        real(8) :: Angle
        real(8) :: Length
        real(8) :: FinalAngle
        real(8) :: TotalLength
        real(8) :: MeasuredDepth
        real(8) :: TotalVerticalDepth
    end type CPathGenerationItem
    
    type, bind(c), public :: CDataPointItem
        real(8) :: X
        real(8) :: Y
    end type CDataPointItem
    
    integer :: PathGenerationCount = 0
    type(CPathGenerationItem), allocatable :: PathGenerations(:)
    
    integer :: PathGenerationDataPointsCount = 0
    type(CDataPointItem), allocatable :: PathGenerationDataPoints(:)
    
    contains
end module CPathGenerationVariables