サブルーチンを作って呼び出すにはどうすれば良いんでしょうか?