(let ((solve (lambda (solve n U R D L u r d l uu rr dd ll)
               (if (= n 0)
                   (concat "solve lambdaman20 " uu rr dd ll)
                   (solve solve (- n 1)
                          (concat U U)
                          (concat R R)
                          (concat D D)
                          (concat L L)
                          uu rr dd ll
                          (concat U l r U ll uu rr D D)
                          (concat R u d R uu rr dd L L)
                          (concat D r l D rr dd ll U U)
                          (concat L d u L dd ll uu R R))))))
  (solve solve 5 "UU" "RR" "DD" "LL" "D" "L" "U" "R" "UURDLDD" "RRDLULL" "DDLURUU" "LLURDRR"))