COMMON J,K
      I=1
      N10=0
      X1=1.0
      X2=-1.0
      X3=-1.0
      X4=-1.0
      J=2                                                               SCK  110
      K=3                                                               SCK  111
      IF(N10)109,109,101                                                SCK  112
  101 DO 108 I=1,N10,1                                                  SCK  113
      J=J+K                                                             SCK  114
      K=J+K                                                             SCK  115
      J=J-K                                                             SCK  116
      K=K-J-J                                                           SCK  117
  108 CONTINUE                                                          SCK  118
  109 CONTINUE                                                          SCK  119
      PRINT *,N10
      PRINT *,J
      PRINT *,K
      PRINT *,X1
      PRINT *,X2
      PRINT *,X3
      PRINT *,X4
      END