@@ -1390,7 +1390,7 @@ The entries labeled "Characteristic." are characteristic boundary conditions bas
 
 This boundary condition can be used for subsonic inflow (`bc_[x,y,z]%[beg,end]` = -7) and subsonic outflow (`bc_[x,y,z]%[beg,end]` = -8) characteristic boundary conditions. These are based on \cite Pirozzoli13. This enables to provide inflow and outflow conditions outside the computational domain.
 
-`bc_[x,y,z]%%vel_in_ramp` starts the inflow smoothly instead of holding it constant, which is what a jet or a tunnel accelerating from rest requires: the start-up is the event of interest, not a transient to be discarded. The inflow velocity is scaled by \f$f(t) = f_0 + (1 - f_0)\left[1 + \tanh\left(6 (t - t_0)/\tau - 3\right)\right]/2\f$, with \f$\tau\f$ = `vel_in_ramp`, \f$t_0\f$ = `vel_in_t0` and \f$f_0\f$ = `vel_in_frac0`, so it leaves \f$f_0\f$ of the final velocity at \f$t_0\f$ and is within half a percent of it at \f$t_0 + \tau\f$. A boundary with `vel_in_ramp = 0` is held constant, as before.
+`bc_[x,y,z]%%vel_in_ramp` starts the inflow smoothly instead of holding it constant, which is what a jet or a tunnel accelerating from rest requires: the start-up is the event of interest, not a transient to be discarded. The inflow velocity is scaled by \f$f(t) = f_0 + (1 - f_0)\left[1 + \tanh\left(6 (t - t_0)/\tau - 3\right)\right]/2\f$, with \f$\tau\f$ = `vel_in_ramp`, \f$t_0\f$ = `vel_in_t0` and \f$f_0\f$ = `vel_in_frac0`, so it leaves \f$f_0\f$ of the final velocity at \f$t_0\f$ and is within half a percent of it at \f$t_0 + \tau\f$. A boundary with `vel_in_ramp = 0` is held constant, as before. The ramp acts on a GRCBC inflow (`grcbc_in`) or on the ghost-cell velocity of a Dirichlet (-17) boundary or boundary patch normal to that direction, such as a nozzle set into a wall.
 
 ### Patch types {#patch-types}
 
 
@@ -21,7 +21,11 @@ module m_boundary_primitives
     logical :: dirichlet_from_buffers = .false.
     $:GPU_DECLARE(create='[dirichlet_from_buffers]')
 
-    public :: f_vel_ramp
+    !> f_vel_ramp per direction, applied to Dirichlet ghost velocities; set by the time stepper when a ramp is active
+    real(wp), dimension(3) :: bc_vel_ramp = 1._wp
+    $:GPU_DECLARE(create='[bc_vel_ramp]')
+
+    public :: f_vel_ramp, bc_vel_ramp
 
 contains
 
@@ -921,7 +925,7 @@ contains
             if (bc_loc == -1) then  ! bc_x%beg
                 do i = 1, sys_size
                     do j = 1, buff_size
-                        q_prim_vf(i)%sf(-j, k, l) = bc_buffers(1, 1)%sf(i, k, l)
+                        q_prim_vf(i)%sf(-j, k, l) = bc_buffers(1, 1)%sf(i, k, l)*f_dir_vel(i, 1)
                     end do
                 end do
                 if ((chemistry .or. heat_conduction) .and. present(q_T_sf)) then
@@ -932,7 +936,7 @@ contains
             else  !< bc_x%end
                 do i = 1, sys_size
                     do j = 1, buff_size
-                        q_prim_vf(i)%sf(m + j, k, l) = bc_buffers(1, 2)%sf(i, k, l)
+                        q_prim_vf(i)%sf(m + j, k, l) = bc_buffers(1, 2)%sf(i, k, l)*f_dir_vel(i, 1)
                     end do
                 end do
                 if ((chemistry .or. heat_conduction) .and. present(q_T_sf)) then
@@ -946,7 +950,7 @@ contains
                 if (bc_loc == -1) then  !< bc_y%beg
                     do i = 1, sys_size
                         do j = 1, buff_size
-                            q_prim_vf(i)%sf(k, -j, l) = bc_buffers(2, 1)%sf(k, i, l)
+                            q_prim_vf(i)%sf(k, -j, l) = bc_buffers(2, 1)%sf(k, i, l)*f_dir_vel(i, 2)
                         end do
                     end do
                     if ((chemistry .or. heat_conduction) .and. present(q_T_sf)) then
@@ -957,7 +961,7 @@ contains
                 else  !< bc_y%end
                     do i = 1, sys_size
                         do j = 1, buff_size
-                            q_prim_vf(i)%sf(k, n + j, l) = bc_buffers(2, 2)%sf(k, i, l)
+                            q_prim_vf(i)%sf(k, n + j, l) = bc_buffers(2, 2)%sf(k, i, l)*f_dir_vel(i, 2)
                         end do
                     end do
                     if ((chemistry .or. heat_conduction) .and. present(q_T_sf)) then
@@ -972,7 +976,7 @@ contains
                 if (bc_loc == -1) then  !< bc_z%beg
                     do i = 1, sys_size
                         do j = 1, buff_size
-                            q_prim_vf(i)%sf(k, l, -j) = bc_buffers(3, 1)%sf(k, l, i)
+                            q_prim_vf(i)%sf(k, l, -j) = bc_buffers(3, 1)%sf(k, l, i)*f_dir_vel(i, 3)
                         end do
                     end do
                     if ((chemistry .or. heat_conduction) .and. present(q_T_sf)) then
@@ -983,7 +987,7 @@ contains
                 else  !< bc_z%end
                     do i = 1, sys_size
                         do j = 1, buff_size
-                            q_prim_vf(i)%sf(k, l, p + j) = bc_buffers(3, 2)%sf(k, l, i)
+                            q_prim_vf(i)%sf(k, l, p + j) = bc_buffers(3, 2)%sf(k, l, i)*f_dir_vel(i, 3)
                         end do
                     end do
                     if ((chemistry .or. heat_conduction) .and. present(q_T_sf)) then
@@ -997,6 +1001,17 @@ contains
 
     end subroutine s_dirichlet
 
+    !> Ramp factor for variable i of a Dirichlet ghost cell on a dir-normal face: bc_vel_ramp(dir) for velocities, else 1
+    pure function f_dir_vel(i, dir) result(f)
+
+        $:GPU_ROUTINE(parallelism='[seq]')
+        integer, intent(in) :: i, dir
+        real(wp)            :: f
+
+        f = merge(bc_vel_ramp(dir), 1._wp, i >= eqn_idx%mom%beg .and. i <= eqn_idx%mom%end)
+
+    end function f_dir_vel
+
     !> Extrapolate QBMM bubble pressure and mass-vapor variables into ghost cells by copying boundary values.
     subroutine s_qbmm_extrapolation(bc_dir, bc_loc, k, l, pb_in, mv_in)
 
 
@@ -22,6 +22,7 @@ module m_time_steppers
     use m_collisions, only: collisions_active
     use m_mpi_proxy
     use m_boundary_common
+    use m_boundary_primitives, only: f_vel_ramp, bc_vel_ramp
     use m_helper
     use m_sim_helpers
     use m_fftw
@@ -466,6 +467,13 @@ contains
             ! reads it, not after. Its GPU_DECLARE only creates device storage and never copies the host value, so
             ! without this the first RHS of a run reads uninitialised memory and later stages read a stale time.
             $:GPU_UPDATE(device='[mytime]')
+            ! Dirichlet inflows ramp too; their ghost fill lives in common code, which cannot read mytime
+            if (any([bc_x%vel_in_ramp, bc_y%vel_in_ramp, bc_z%vel_in_ramp] > 0._wp)) then
+                bc_vel_ramp = [f_vel_ramp(bc_x%vel_in_ramp, bc_x%vel_in_t0, bc_x%vel_in_frac0, mytime), &
+                                          & f_vel_ramp(bc_y%vel_in_ramp, bc_y%vel_in_t0, bc_y%vel_in_frac0, mytime), &
+                                          & f_vel_ramp(bc_z%vel_in_ramp, bc_z%vel_in_t0, bc_z%vel_in_frac0, mytime)]
+                $:GPU_UPDATE(device='[bc_vel_ramp]')
+            end if
             call s_compute_rhs(q_cons_ts(1)%vf, q_T_sf, q_prim_vf, bc_type, rhs_vf, pb_ts(1)%sf, rhs_pb, mv_ts(1)%sf, rhs_mv, &
                                & t_step, s)
 
 
@@ -34,11 +34,12 @@
 # See the contributing guide for how to add entries.
 PHYSICS_DOCS = {
     "check_inflow_ramp": {
-        "title": "GRCBC Inflow Ramp",
+        "title": "Inflow Ramp",
         "category": "Boundary Conditions",
         "math": r"f(t) = f_0 + (1 - f_0)\left[1 + \tanh\left(6 (t - t_0)/\tau - 3\right)\right]/2",
         "explanation": "A ramped inflow scales the inflow velocity from a fraction f_0 of its final value to "
-        "that value over a duration tau. It requires grcbc_in to act on, a non-negative duration, and f_0 in [0, 1].",
+        "that value over a duration tau. It requires an inflow to act on (grcbc_in, or a Dirichlet boundary or patch), "
+        "a non-negative duration, and f_0 in [0, 1].",
     },
     # Thermodynamic Constraints
     "check_stiffened_eos": {
@@ -760,10 +761,14 @@ def check_inflow_ramp(self):
             ramp = self.get(f"bc_{d}%vel_in_ramp", 0) or 0
             frac0 = self.get(f"bc_{d}%vel_in_frac0", 0) or 0
             self.prohibit(ramp < 0, f"bc_{d}%vel_in_ramp must be >= 0")
-            # a ramp needs an inflow to act on
+            # a ramp needs an inflow to act on: a GRCBC inflow, or a Dirichlet face or boundary patch
+            grcbc = self.get(f"bc_{d}%grcbc_in", "F") == "T"
+            dirichlet = any(self.get(f"bc_{d}%{e}", 0) == -17 for e in ("beg", "end")) or any(
+                self.get(f"patch_bc({i})%type", 0) == -17 and self.get(f"patch_bc({i})%dir", 0) == "xyz".index(d) + 1 for i in range(1, (self.get("num_bc_patches", 0) or 0) + 1)
+            )
             self.prohibit(
-                ramp > 0 and self.get(f"bc_{d}%grcbc_in", "F") != "T",
-                f"bc_{d}%vel_in_ramp requires bc_{d}%grcbc_in",
+                ramp > 0 and not (grcbc or dirichlet),
+                f"bc_{d}%vel_in_ramp requires bc_{d}%grcbc_in or a Dirichlet (-17) boundary or patch normal to {d}",
             )
             self.prohibit(not 0 <= frac0 <= 1, f"bc_{d}%vel_in_frac0 must lie in [0, 1]")