mahmood19227
/
SimulationCore2
1
0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Simulation Core
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
6 Commits
2 Branches
134 MiB
 
 
 
 
 
 
Tree: e0184c4093
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'e0184c4093'
${ noResults }
SimulationCore2/CSharp/BasicInputs/WellProfile/CWellSurveyDataVariables.f90

20 lines
497 B
Raw Blame History 

  1. module CWellSurveyDataVariables

  2.     implicit none

  3.     public

  4.     

  5.     ! types

  6.     type, bind(c), public :: CSurveyDataItem

  7.         real(8) :: MeasuredDepth

  8.         real(8) :: Inclination

  9.         real(8) :: Azimoth

  10.         real(8) :: TotalVerticalDepth

  11.         real(8) :: X

  12.         real(8) :: Y

  13.         real(8) :: Z

  14.     end type CSurveyDataItem

  15.     

  16.     integer :: SurveyDataCount = 0

  17.     type(CSurveyDataItem), allocatable :: WellSurveyData(:)

  18.     

  19.     contains

  20. end module CWellSurveyDataVariables