Simulation Core
25'ten fazla konu seçemezsiniz Konular bir harf veya rakamla başlamalı, kısa çizgiler ('-') içerebilir ve en fazla 35 karakter uzunluğunda olabilir.

RopMain.f90 530 B

1 yıl önce
1234567891011121314151617181920
  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