{.experimental.}
import os, strutils, threadpool
if paramCount() < 1:
quit()
proc longCompute(n: int) =
var data: int = 0
for x in 0..100:
data = n * data
echo $data
proc main(arg: int) =
parallel:
for x in 0..3:
spawn longCompute(arg)
when isMainModule:
if paramCount() < 1:
quit()
let arg = parseInt(paramStr(1))
main(arg)