Simulation Core
Nie możesz wybrać więcej, niż 25 tematów Tematy muszą się zaczynać od litery lub cyfry, mogą zawierać myślniki ('-') i mogą mieć do 35 znaków.

CCasingLinerChokeVariables.f90 592 B

1 rok temu
123456789101112131415161718192021222324
  1. module CCasingLinerChokeVariables
  2. implicit none
  3. public
  4. ! variables
  5. real(8) :: CasingDepth
  6. real(8) :: CasingId
  7. real(8) :: CasingOd
  8. real(8) :: CasingWeight
  9. real(8) :: CasingCollapsePressure
  10. real(8) :: CasingTensileStrength
  11. real(8) :: LinerTopDepth
  12. real(8) :: LinerLength
  13. real(8) :: LinerId
  14. real(8) :: LinerOd
  15. real(8) :: LinerWeight
  16. real(8) :: LinerCollapsePressure
  17. real(8) :: LinerTensileStrength
  18. real(8) :: OpenHoleId
  19. real(8) :: OpenHoleLength
  20. contains
  21. end module CCasingLinerChokeVariables