1
2
3
4
5
6
7
8
9
10
11
12
procedure main(argc, argv[])
// create thread_count as result of converting argv[1] to integer
shared thread_count := integer(argv[1])
for thread_number := 0 to thread_count do
create_thread(greet, thread_number) // thread team
end for
print "Hello from main thread"
end procedure
procedure greet(thread_number)
print "Hello from secondary thread", thread_number, " of ", thread_count
end procedure