RosettaCodeData/Task/Semiprime/Bracmat/semiprime-2.bracmat
2023-07-01 13:44:08 -04:00

7 lines
99 B
Text

2^63:?u
& whl
' ( -1+!u:>2:?u
& ( semiprime$!u:?R&out$(!u ":" !R)
|
)
);