Problem: pascal golf

Code: pascal+golf/tails_1693450823

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)

? (if/else):[chr] 
    `& (bit intersection):int 
        ; (save):int -->let( A:int ) 
            `r (read int):int 
                @ (= fstLine):[chr] 
        ; (save):int -->let( B:int ) 
            - (subtract):int 
                $ (= A):int 
                ~ (auto = 1):auto 
    ;@ (= fstLine):[chr] <--arg( C:int ) 
    : (append):[chr] 
        $ (= B):int 
        "and x" (string):[chr]