Modified the \subpoint command