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

20 lines
530 B

  1. module RopMain
  2. implicit none
  3. public
  4. contains
  5. ! subroutine Rop_Setup()
  6. ! use CSimulationVariables
  7. ! implicit none
  8. ! call OnSimulationInitialization%Add(Rop_Init)
  9. ! call OnSimulationStop%Add(Rop_Init)
  10. ! call OnRopStep%Add(Rop_Step)
  11. ! call OnRopOutput%Add(Rop_Output)
  12. ! call OnRopMain%Add(RopMainBody)
  13. ! end subroutine
  14. subroutine Rop_Step
  15. implicit none
  16. end subroutine Rop_Step
  17. end module RopMain