User pressure update.
This user subroutine helps to set a user pressure at the end of solve_navier subroutine.