平衡点

2009/12/21

_ お買い物

一足遅いけれど.

R.I.P. / Merry Christmas
BUMP OF CHICKEN, TOY'S FACTORY Inc., ￥790

スピードチューンの方が好きなわけで, 久々に良い感じ.もう少しリズムセクションがラウドだったら申し分ない.

満足.

_ 「OpenMPI で "use mpi" が効きません」の続き

まさかと思って, gfortran-4.3 を install してから試してみた.

コードは以下の通り. 本来は configure 時に試すコードなので"print ..." は無いけれど.

program test
  use mpi
  integer :: err, rank, np
  call MPI_Init(err)
  call MPI_Comm_Rank(MPI_Comm_World, rank, err)
  print *, "hello! I'm proc=", rank
  call MPI_Comm_Size(MPI_Comm_World, np, err)
  call MPI_Finalize(err)
end program test

でもって OMPI_FC を指定して試してみると...

$ mpif90 conftest.f90
conftest.f90:2.9:

  use mpi
         1
Fatal Error: Parse error when checking module version for file
'mpi.mod' opened at (1)
$ OMPI_FC=/usr/bin/gfortran-4.3 mpif90 conftest.f90
$ mpiexec -np 4 ./a.out
 hello! I'm proc=           1
 hello! I'm proc=           2
 hello! I'm proc=           3
 hello! I'm proc=           0

( ゜д゜) 通ったヨ...ソウイウコトデスカ...

どうしよ. BTS すべき?(小心者)...

(追記) BTS しました. 我ながら変な英語…