Написать программу разложения произвольной подстановки в циклы

print(*(k + ' = ' + (lambda s:(lambda permutation:(lambda n:(lambda visited:'(' + ')('.join(' '.join(map(str,(dfs:=lambda i, r:r if visited[i] else (lambda actions:dfs(permutation[i], r))([r.append(i), visited.pop(i), visited.insert(i, True)]))(i, []))) for i in range(1, n) if not visited[i]) + ')')([False] * n))(len(permutation)))([0] + [int(x) for x in s.strip('()').split()]))(v) for k, v in {'u': '(3 8 1 2 4 5 6 7)', 'v': '(2 1 4 3 5 8 7 6)', 'w': '(2 7 1 3 8 4 5 6)'}.items()), sep='\n')

print(*(k + ' = ' + (lambda s:(lambda permutation:(lambda n:(lambda visited:'(' + ')('.join(' '.join(map(str,(dfs:=lambda i, r:r if i in visited else (lambda actions:dfs(permutation[i], r))([r.append(i), visited.add(i)]))(i, []))) for i in range(1, n) if i not in visited) + ')')(set()))(len(permutation)))([0] + [int(x) for x in s.strip('()').split()]))(v) for k, v in {'u': '(3 8 1 2 4 5 6 7)', 'v': '(2 1 4 3 5 8 7 6)', 'w': '(2 7 1 3 8 4 5 6)'}.items()), sep='\n')

def decomp_cycle(subst):
    r=""
    tmp=list(subst)
    n=len(tmp)
    while True:
        for i in range(n):
            if tmp[i] != ' ':
                p=i
                c="("+str(p+1)
                while True:
                    k=int(tmp[p])
                    tmp[p]=' '
                    p=k-1
                    if k==i+1:
                        break
                    c=c+str(k)
                c=c+")"
                r=r+c
        else:
            return r
 
print(decomp_cycle("38124567"))
print(decomp_cycle("21435876")) 
print(decomp_cycle("27138456"))

def f(s):
    *a, = map(int, s.split())
    v = set()
    #v = [0]*(len(a)+1)
    res = ''
    for i in range(1, len(a)+1):
        p = i
        tmp = []
        while p not in v:
            tmp.append(str(p))
            v.add(p)
            p = a[p-1]
        if tmp:
            res += '('+' '.join(tmp)+')'
            #res += '('+''.join(tmp)+')'
    return res
 
 
print(f('3 8 1 2 4 5 6 7'))
print(f('2 1 4 3 5 8 7 6'))
print(f('2 7 1 3 8 4 5 6'))