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.
 
 
 
 
 
 

30 lines
1.0 KiB

  1. module CBopStackVariables
  2. implicit none
  3. public
  4. Type::BopStackSpecificationType
  5. real(8) :: AboveAnnularHeight = 10.0d0
  6. real(8) :: AnnularPreventerHeight = 10.2d0
  7. real(8) :: UpperRamHeight = 14.632d0
  8. real(8) :: LowerRamHeight = 21.35d0
  9. real(8) :: BlindRamHeight = 16.24d0
  10. real(8) :: KillHeight = 18.8d0
  11. real(8) :: KillOpen = 1.5d0
  12. real(8) :: KillClose = 1.5d0
  13. real(8) :: GroundLevel = 30.0d0
  14. real(8) :: LowerRamOpen
  15. real(8) :: LowerRamClose
  16. real(8) :: ChokeOpen
  17. real(8) :: ChokeClose
  18. real(8) :: BlindRamOpen
  19. real(8) :: BlindRamClose
  20. real(8) :: UpperRamOpen
  21. real(8) :: UpperRamClose
  22. real(8) :: AnnularPreventerOpen
  23. real(8) :: AnnularPreventerClose
  24. real(8) :: RamStringDrag
  25. real(8) :: AnnularStringDrag
  26. real(8) :: ChokeLineLength
  27. real(8) :: ChokeLineId
  28. End Type BopStackSpecificationType
  29. end module CBopStackVariables