Merge pull request #13976 from drjfloyd/master

FDS Source: Don't check spacing for MO RAMPs. Issue #13975
firemodels · Jan 3, 2025 · fe2fbee · fe2fbee
2 parents e5bc376 + 4c307c1
commit fe2fbee
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/Source/read.f90 b/Source/read.f90
@@ -10203,7 +10203,8 @@ SUBROUTINE READ_RAMP
    DO I=1,RP%NUMBER_INTERPOLATION_POINTS-1
       TM = RP%INDEPENDENT_DATA(1) + REAL(I,EB)/RP%RDT
       TLOOP: DO II=1,RP%NUMBER_DATA_POINTS-1
-         IF ((RP%INDEPENDENT_DATA(II+1)-RP%INDEPENDENT_DATA(II))*RP%RDT < 1._EB) DT_WARNING = .TRUE.
+         IF ((RP%INDEPENDENT_DATA(II+1)-RP%INDEPENDENT_DATA(II))*RP%RDT < 1._EB .AND. &
+            TRIM(RP%ID)/='RSRVD TEMPERATURE PROFILE' .AND. TRIM(RP%ID)/='RSRVD VELOCITY PROFILE' ) DT_WARNING = .TRUE.
          IF (TM>=RP%INDEPENDENT_DATA(II) .AND. TM<RP%INDEPENDENT_DATA(II+1)) THEN
             RP%INTERPOLATED_DATA(I) = RP%DEPENDENT_DATA(II) +  (TM-RP%INDEPENDENT_DATA(II)) * &
                           (RP%DEPENDENT_DATA(II+1)-RP%DEPENDENT_DATA(II))/(RP%INDEPENDENT_DATA(II+1)-RP%INDEPENDENT_DATA(II))