rss forum sources ru
rss_forum_sources_ru

 -

rss_forum_sources_ru

 - e-mail

 

 -

LiveInternet.ru:
: 29.07.2007
:
:
: 80

:

, 22 2021 . 05:05 +
korvin: applegame, , front back payload, next prev .

- ?

    void forward(const DList!Int l) {
    writeln("-- forward");
    if (l.empty()) {
    return;
    }
    writeln(l.front);
    forward(l.popFront());
    }
    void backward(const DList!Int l) {
    writeln("-- backward");
    if (l.empty()) {
    return;
    }
    writeln(l.back);
    backward(l.popBack());
    }
    void forwardBackward(const DList!Int l) {
    writeln("-- forwardBackward");
    if (l.empty()) {
    return;
    }
    writeln(l.front);
    const next = l.popFront();
    if (next.empty()) {
    backward(l);
    } else {
    forwardBackward(next);
    }
    }
    void backwardForward(const DList!Int l) {
    writeln("-- backwardForward");
    if (l.empty()) {
    return;
    }
    writeln(l.back);
    const prev = l.popBack();
    if (prev.empty()) {
    forward(l);
    } else {
    backwardForward(prev);
    }
    }


forwardBackward ()
    1
    2
    3
    4
    3
    2
    1

pop*- .

: , (.. ), , /inputstream.

:
    fibs = 0 : 1 : zipWith (+) fibs (tail fibs)


10 :
    print $ take 10 fibs

https://ideone.com/bB92Nu

Scheme , : https://ideone.com/ysmTzd

Java - , Cell, , (zip, take) , Haskell Scheme : https://ideone.com/K4Z9QW

, Cell, : https://ideone.com/DDjz1i

payload, next prev.

https://forum.sources.ru/index.php?showtopic=421266&view=findpost&p=3846640

:  

— — : [1] []
 

:
: 

: ( )

:

  URL