00001 module interface_interpolation_fillup_binary
00002   implicit none
00003   interface
00004     subroutine interpolation_fillup_binary(fnc)
00005       real(8), pointer :: fnc(:,:,:)
00006     end subroutine interpolation_fillup_binary
00007   end interface
00008 end module interface_interpolation_fillup_binary