clear

call proc1("A") with concur
call proc1("B") with concur

procedure proc1(id)

  for (i = 0; i < 5; i++)
  {
  	print "Id -> " + id + " / " + i
  	wait 1000
  }
    
end