D O U B L E P R E C I S I O N  DO 10I
      INT E GER                      I

      DO 10 I = 1, 20
         DO 10 I = 1.20
   10 CONTINUE