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

15 рядки
377 B

  1. module CBitProblemsVariables
  2. use CProblemDifinition
  3. implicit none
  4. public
  5. ! Input vars
  6. type:: BitProblemsType
  7. type(CProblem) :: PlugJets
  8. type(CProblem) :: JetWashout
  9. integer :: PlugJetsCount
  10. integer :: JetWashoutCount
  11. end type BitProblemsType
  12. contains
  13. end module CBitProblemsVariables