@@ -708,7 +708,7 @@ function p_constraint_exa!(p, p_ocp, e1, e2, e3, c_type, label)
708708 if isnothing (rg)
709709 rg = :(1 : ($ (p. dim_x))) # x(t0) implies rg == nothing but means x[1:p.dim_x](t0)
710710 e2 = subs (e2, p. x, :($ (p. x)[$ rg]))
711- elseif ! is_range (rg) # debug: there (and elsewhere), just if then + systematic as_range (no more is_range)
711+ else # debug: if !is_range(rg) # debug: there (and elsewhere), just if then + systematic as_range (no more is_range)
712712 rg = as_range (rg)
713713 end
714714 code = :(
@@ -727,7 +727,7 @@ function p_constraint_exa!(p, p_ocp, e1, e2, e3, c_type, label)
727727 if isnothing (rg)
728728 rg = :(1 : ($ (p. dim_x)))
729729 e2 = subs (e2, p. x, :($ (p. x)[$ rg]))
730- elseif ! is_range (rg)
730+ else # debug: if !is_range(rg)
731731 rg = as_range (rg) # case rg = i (vs i:j or i:p:j)
732732 end
733733 code = :(
@@ -746,7 +746,7 @@ function p_constraint_exa!(p, p_ocp, e1, e2, e3, c_type, label)
746746 if isnothing (rg)
747747 rg = :(1 : ($ (p. dim_v)))
748748 e2 = subs (e2, p. v, :($ (p. v)[$ rg]))
749- elseif ! is_range (rg)
749+ else # debug: if !is_range(rg)
750750 rg = as_range (rg) # case rg = i (vs i:j or i:p:j)
751751 end
752752 code_box = :(
@@ -763,7 +763,7 @@ function p_constraint_exa!(p, p_ocp, e1, e2, e3, c_type, label)
763763 (:state_range , rg) => begin
764764 if isnothing (rg)
765765 rg = :(1 : ($ (p. dim_x))) # NB. no need to update e2 (unused) here
766- elseif ! is_range (rg)
766+ else # debug: if !is_range(rg)
767767 rg = as_range (rg) # case rg = i (vs i:j or i:p:j)
768768 end
769769 code_box = :(
@@ -780,7 +780,7 @@ function p_constraint_exa!(p, p_ocp, e1, e2, e3, c_type, label)
780780 (:control_range , rg) => begin
781781 if isnothing (rg)
782782 rg = :(1 : ($ (p. dim_u))) # NB. no need to update e2 (unused here)
783- elseif ! is_range (rg)
783+ else # debug: if !is_range(rg)
784784 rg = as_range (rg) # case rg = i (vs i:j or i:p:j)
785785 end
786786 code_box = :(
0 commit comments