Simulation Core
25개 이상의 토픽을 선택하실 수 없습니다. Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

CHoistingProblemsVariables.i90 447 B

1 년 전
123456789101112131415161718
  1. # 1 "/mnt/c/Projects/VSIM/SimulationCore2/CSharp/Problems/CHoistingProblemsVariables.f90"
  2. module CHoistingProblemsVariables
  3. use CProblemDifinition
  4. implicit none
  5. public
  6. ! Input vars
  7. type :: HoistingProblemsType
  8. type(CProblem) :: MotorFail
  9. type(CProblem) :: ClutchEngage
  10. type(CProblem) :: ClutchDisengage
  11. end type HoistingProblemsType
  12. contains
  13. end module CHoistingProblemsVariables