Remove physics_common.F90

This commit is contained in:
Paul Romano 2019-01-15 07:37:32 -06:00
parent 1138b5bb45
commit 6d4017f3a2
2 changed files with 0 additions and 21 deletions

View file

@ -331,7 +331,6 @@ add_library(libopenmc SHARED
src/particle_header.F90
src/particle_restart.F90
src/photon_header.F90
src/physics_common.F90
src/pugixml/pugixml_f.F90
src/random_lcg.F90
src/reaction_header.F90

View file

@ -1,20 +0,0 @@
module physics_common
use, intrinsic :: ISO_C_BINDING
use particle_header, only: Particle
implicit none
!===============================================================================
! RUSSIAN_ROULETTE FROM C
!===============================================================================
interface
subroutine russian_roulette(p) bind(C)
import Particle
type(Particle), intent(inout) :: p
end subroutine russian_roulette
end interface
end module physics_common