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.
 
 
 
 
 
 

20 lines
511 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