Sub Articulo 60.2

This must be some impressive list!  Did you consider using sectioning commands
for the outer level?
Here's my attempt:
\@definecounter{enumv}                         
\def\enumerate{%
  \ifnum \@enumdepth >4\@toodeep\else          % This line changed.
    \advance\@enumdepth\@ne
    \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
      \expandafter
      \list
        \csname label\@enumctr\endcsname
        {\usecounter\@enumctr\def\makelabel##1{\hss\llap{##1}}}%
  \fi}
\let\endenumerate =\endlist
\renewcommand\theenumv{\@Roman\c@enumv}    %
\newcommand\labelenumv{\theenumv.}         % Label is I. II. III. IV. etc
\renewcommand\p@enumv{\p@enumiv\theenumiv}