Orz日記 by Akio Morita

_ [SAD]tffsmatch.f書き換え完了

qu/qu0 arrayのallocation/deallocationをtffsmatch()へ局所化、mmap_sharedベースに書き換え完了

qu/qu0配列の受け渡しを見ていると…なんか変な感じがするというか、バグってるぽぃ 要調査

tgradとtfsolvで勾配配列と作業領域を渡す順番が異なっている上に、subroutine側の仮引数名の逆になっているという極めて紛らわしい設計になっていた

更に、tgradとtfsolvの呼び出しは、並列スコープ外なので、作業領域(qu0 @ tffsmatch)が共有メモリ上にある必要が無い

mapallocの残り

• src/trackd.f - intlmに nzp0 x nzpなinteger 2次元配列
• src/tffscalc.f - iutmに 2*nfam+1 x 4なreal 2次元配列(おそらく-nafm:nfam)
• src/itfmaloc.f - itfmalocp()のmapモード
  • 参照元は、src/temap.f, src/tfdot.f, src/tffswake.f, src/tftrack.f
  • 全てがmapモードを使う訳ではないので要調査
    • map=.false.なインターフェースを別途設けるべきか？
  • Listを参照して、内容を展開した配列をヒープから割り当てているので、module化して、real 2次元配列 pointerを受け取るインターフェースを実装すべきか？
• src/tfshared.f - OpenSharedなので後回し