This subroutine increments the value of top transition index.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(dfa_state_node_t), | intent(inout) | :: | self |
pure subroutine dfa_state_node__increment_transition_top (self) implicit none class(dfa_state_node_t), intent(inout) :: self self%tra_top = self%tra_top + 1 end subroutine dfa_state_node__increment_transition_top