llvm/flang/test/Driver/Inputs/libfun.f90

subroutine libfun(x)
  integer :: x
end subroutine