Artifact 6b6d7ff7af65edf2cbb5a8386dfcb7c32903db6d

• File sample/fizzbuzz.pmy
  • 2010-11-21 16:05:20 - part of checkin [da7559b744] on branch trunk - fizzbuzz sample changed (user: kinaba) [annotate]

     1  #
     2  # Not at all a good example of the usage of layers, but anyway...
     3  #
     4  
     5  @@3(x){x};
     6  @@5(x){x};
     7  @@15(x){x};
     8  def incr(x) { x+1 };
     9  @ 3 incr(x) {@value( if(@ 3(x)+1< 3){@ 3(x)+1}else{0} )};
    10  @ 5 incr(x) {@value( if(@ 5(x)+1< 5){@ 5(x)+1}else{0} )};
    11  @15 incr(x) {@value( if(@15(x)+1<15){@15(x)+1}else{0} )};
    12  
    13  def fb(n @value @3 @5 @15) {
    14    print(
    15  	if( @15(n) ) { if( @5(n) ) { if( @3(n) ) { n } else { "Fizz" } } else { "Buzz" } } else { "FizzBuzz" }
    16    );
    17    fb(incr(n))
    18  };
    19  
    20  fb(0)