Simulation Core
Ви не можете вибрати більше 25 тем Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.
 
 
 
 
 
 

18 рядки
442 B

  1. module CKickProblemsVariables
  2. use CProblemDifinition
  3. implicit none
  4. public
  5. ! Input vars
  6. type :: KickProblemsType
  7. type(CProblem) :: Kick
  8. integer :: FluidType
  9. integer :: FlowRate
  10. integer :: OverBalancePressure
  11. logical :: IsAutoMigrationRateSelected
  12. real(8) :: AutoMigrationRate
  13. end type KickProblemsType
  14. end module CKickProblemsVariables