Problem: from UNIX time

Code: from+UNIX+time/tails_1646010413

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)

(implicit string concatenation):[chr] 
    (implicit string concatenation):[chr] 
        (implicit string concatenation):[chr] 
            (implicit string concatenation):[chr] 
                (implicit string concatenation):[chr] 
                    (implicit string concatenation):[chr] 
                        (implicit string concatenation):[chr] 
                            (implicit string concatenation):[chr] 
                                (implicit string concatenation):[chr] 
                                    (implicit string concatenation):[chr] 
                                        / (foldr1):int -->let( U:int T:int ) 
                                            | (filter):[int,int,int] 
                                                `. (iterate while uniq):[int,int,int] 
                                                    ~~ (3-ary tuple):int,int,int 
                                                        `/ (divmod):int -->let( C:int ) 
                                                            `/ (divmod):int -->let( B:int ) 
                                                                `/ (divmod):int -->let( A:int ) 
                                                                    $ (= fstInt):int 
                                                                    60 (integer):int 
                                                                60 (integer):int 
                                                            24 (integer):int 
                                                        0 (integer):int 
                                                        1970 (integer):int 
                                                    (implicit tuple):int,int,int <--arg( F:int E:int D:int ) 
                                                        - (subtract):int 
                                                            $ (= F):int 
                                                            ? (if/else):int 
                                                                != (abs diff):int 
                                                                    @ (= E):int 
                                                                    2 (integer):int 
                                                                ? (if/else):int <--arg( G:int ) 
                                                                    `& (bit intersection):int 
                                                                        * (multiply):int 
                                                                            9 (integer):int 
                                                                            _ (= E):int 
                                                                        8 (integer):int 
                                                                    31 (integer):int <--arg( H:int ) 
                                                                    30 (integer):int 
                                                                ? (if/else):int 
                                                                    % (modulus):int 
                                                                        _ (= D):int 
                                                                        4 (integer):int 
                                                                    28 (integer):int <--arg( I:int ) 
                                                                    29 (integer):int 
                                                        + (add):int 
                                                            `% (moddiv):int -->let( J:int ) 
                                                                @ (= E):int 
                                                                12 (integer):int 
                                                            ~ (auto = 1):auto 
                                                        + (add):int 
                                                            ;$ (= D):int 
                                                            $ (= J):int 
                                                - (subtract):int <--arg( M:int L:int K:int ) 
                                                    0 (integer):int 
                                                    $ (= M):int 
                                            (implicit tuple):int,int,int <--arg( S:int R:int Q:int P:int O:int N:int ) 
                                                _ (= Q):int 
                                                @ (= R):int 
                                                + (add):int 
                                                    31 (integer):int 
                                                    $ (= S):int 
                                        "/" (string):[chr] <--arg( W:int V:int ) 
                                    ;~ (save fn):[chr] -->let( Y:fn(int->[chr]) ) 
                                        $ (= U):int 
                                        & (justify):[chr] <--arg( X:int ) 
                                            "0" (string):[chr] 
                                            2 (integer):int 
                                            $ (= X):int 
                                "/" (string):[chr] 
                            $ (= Y):[chr] 
                                _ (= T):int 
                        " " (string):[chr] 
                    $ (= Y):[chr] 
                        ;$ (= C):int 
                ; (save):[chr] -->let( Z:[chr] ) 
                    ":" (string):[chr] 
            @ (= Y):[chr] 
                ;_ (= B):int 
        $ (= Z):[chr] 
    @ (= Y):[chr] 
        (implicit arg = A):int