Problem: trail

Code: trail/tails_1697086909

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)

/ (foldr):[chr] -->let( F:[chr] ) 
    \ (reverse):[chr] 
        @ (= fstLine):[chr] 
    ~ (tuple):[chr],[chr] 
        ;;@ (= sndLine):[chr] 
        "\n" (string):[chr] 
    (implicit tuple):[chr],[chr] <--arg( C:chr B:[chr] A:[chr] ) 
        : (append):[chr] 
            ? (if/else):[chr] -->let( E:[chr] ) 
                - (subtract):chr 
                    $ (= C):chr 
                    ;$ (= fstInt):int 
                ~ (tuple):[chr],[chr] <--arg( D:chr ) 
                    _ (= B):[chr] 
                    : (append):[chr] 
                        ;$ (= A):[chr] 
                        "." (string):[chr] 
                (implicit tuple):[chr],[chr] 
                    : (append):[chr] 
                        @ (= B):[chr] 
                        << (init):[chr] 
                            _ (= A):[chr] 
                    _ (= A):[chr] 
            "#" (string):[chr] 
        (implicit arg = E):[chr]