begin
  integer i,j,k,l,m,n
  routine r
    integer j,k,l,m,n
    routine r
      integer k,l,m,n
      routine r
        integer l,m,n
        routine r
          integer m,n
          r
          routine r
            integer n
            i = j
            j = k
            k = l
            l = m
            m = n
            n = 1
          end
          r
          i = j
          j = k
          k = l
          l = m
          m = n
          n = 1
        end
        i = j
        j = k
        k = l
        l = m
        m = n
        n = 1
      end
      i = j
      j = k
      k = l
      l = m
      m = n
      n = 1
    end
    i = j
    j = k
    k = l
    l = m
    m = n
    n = 1
  end
  i = j
  j = k
  k = l
  l = m
  m = n
  n = 1
endofprogram