00001 module interface_vol_int_fluid
00002 implicit none
00003 interface
00004 subroutine vol_int_fluid(souf,vol)
00005 real(8), pointer :: souf(:,:,:)
00006 real(8), intent(out) :: vol
00007 end subroutine vol_int_fluid
00008 end interface
00009 end module interface_vol_int_fluid