module b
implicit none
private
public g

contains

integer function g()
g = 5
end function

end module
