10 lines
353 B
Plaintext
10 lines
353 B
Plaintext
main(params):+
|
|
stack =: new row \ a row is a nice stack
|
|
?# v =: tuple 1,3,5,7,11,13 give values
|
|
row stack push v \ push some primes
|
|
print '*' _ stack[stack.Count] \ get top
|
|
?# i =: from 1 upto 7
|
|
? i %% 3 = 0
|
|
print '*' _ stack[stack.Count]
|
|
print stack::pop \ class function syntax used
|