SimulationCore2/TorqueDrag/TD_Modules/TD_WellElements.f90

MODULE TD_WellElements
    
    IMPLICIT NONE
    PUBLIC

    
    
!************************************************************************************************************************************
    TYPE , PUBLIC :: TD_WellElementsInfo
        INTEGER :: CasingNumbs
        INTEGER :: LinerNumbs
        INTEGER :: OpenHoleNumbs
        INTEGER :: ROPHoleNumbs
        REAL(8) :: ROP
    END TYPE TD_WellElementsInfo
!************************************************************************************************************************************

    

!************************************************************************************************************************************
!====================================================
!                Casing Info
!====================================================
    TYPE, PUBLIC :: TD_CasingInfo
        INTEGER  :: HoleType
        REAL(8)  :: Length , TopDepth , DownDepth , Od , Id , Weight , CollapsePressure , TensileStrength , Roughness
    END TYPE TD_CasingInfo
!************************************************************************************************************************************

    
    
!************************************************************************************************************************************
!====================================================
!                Liner Info
!====================================================
    TYPE, PUBLIC :: TD_LinerInfo
        REAL(8)  :: Length , TopDepth , DownDepth , Od , Id , Weight , CollapsePressure , TensileStrength , Roughness , HoleType
    END TYPE TD_LinerInfo
!************************************************************************************************************************************

    
    
!************************************************************************************************************************************
!====================================================
!                Open_Hole Info
!====================================================
    TYPE, PUBLIC :: TD_OpenHoleInfo
        REAL(8)  :: Length , TopDepth , DownDepth , Id , HoleType
    END TYPE TD_OpenHoleInfo
!************************************************************************************************************************************

    
    
!************************************************************************************************************************************  
!====================================================
!                ROP_Hole Info
!====================================================
    TYPE, PUBLIC :: TD_ROPHoleInfo
        REAL(8)  :: Length , TopDepth , DownDepth , Id , HoleType
    END TYPE TD_ROPHoleInfo
!************************************************************************************************************************************

    
    
    
    
    
END MODULE TD_WellElements