object Test extends Application {
  for(n <- List(1000,2000,3000)) message.main(Array(n.toString)) 
}