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.
 
 
 
 
 
 

17 lines
399 B

  1. module CMudTreatmentProblemsVariables
  2. use CProblemDifinition
  3. implicit none
  4. public
  5. ! Input vars
  6. Type::MudTreatmentProblemsType
  7. type(CProblem) :: Degasser
  8. type(CProblem) :: ShaleShaker
  9. type(CProblem) :: Desander
  10. type(CProblem) :: Desilter
  11. end type MudTreatmentProblemsType
  12. contains
  13. end module CMudTreatmentProblemsVariables