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.
 
 
 
 
 
 

14 lines
366 B

  1. module CShoeVariables
  2. implicit none
  3. public
  4. ! variables
  5. Type::ShoeType
  6. integer :: FormationNo
  7. real(8) :: ShoeDepth
  8. real(8) :: LeakOff
  9. real(8) :: Breakdown
  10. real(8) :: FracturePropagation
  11. logical :: InactiveFracture
  12. End type ShoeType
  13. Type(ShoeType)::Shoe
  14. end module CShoeVariables