# 1 "/mnt/c/Projects/VSIM/SimulationCore2/CSharp/BasicInputs/Geology/CFormationVariables.f90" module CFormationVariables ! !@use ConfigurationVariables, only: Configuration implicit none public ! types ! Pipe Items in String Array type, bind(c), public :: CFormationItem real(8) :: Top real(8) :: Thickness real(8) :: Drillablity real(8) :: Abrasiveness real(8) :: ThresholdWeight real(8) :: PorePressureGradient end type CFormationItem Type::FormationType integer :: Count = 0 type(CFormationItem), allocatable :: Formations(:) End type FormationType end module CFormationVariables