Delete unnecessary output and calculation

[kohei-noda-qcrg]

このプルリクは何?

プルリクの内容を記述してください

• e0aftertra.f90の実行時間が長すぎる #133 を解消したプルリクです
  • DEBUG シンボルを追加して、デバッグ用ビルド以外のとき、時間がかかる特定のコードを実行しないようにしました
  • 以下のようにするとデバッグ用ビルド以外のときは、#ifdef から#endifまでのコードが実行されません
    

    dirac_caspt2/src/r4dcasci.f90

    Lines 125 to 137 in da5d888

    	#ifdef DEBUG
    	!! TEST TO CALCULATE FOCK MATRIX OF HF STATE fpq = hpq + SIGUMA_r[(pq|rr)-(pr|qr)]
    	!! THIS MUST BE DIAGONAL MATRIX AND DIAGONAL ELEMENTS CORESPONDS TO SPINOR ENERGIES.
    	if (realonly%is_realonly()) then
    	allocate (fock_real(nmo, nmo)); Call memplus(KIND(fock_real), SIZE(fock_real), 1)
    	fock_real(:, :) = 0.0d+00
    	call fock_matrix_of_hf_real
    	else
    	Allocate (fock_cmplx(nmo, nmo)); Call memplus(KIND(fock_cmplx), SIZE(fock_cmplx), 2)
    	fock_cmplx(:, :) = 0.0d+00
    	call fock_matrix_of_hf_complex
    	End if
    	#endif

• 不要なアウトプットも削除しました
  • 削除前後の行数
    • 1/3程度になっています

  ~/develop/dirac_caspt2_main/test/dev/c2_h2o_dev (delete-unnecessary-output-and-calculation *) $ wc -l c2_h2o_dev.caspt2.out reference.c2_h2o_dev.out
   769 c2_h2o_dev.caspt2.out
  2524 reference.c2_h2o_dev.out
  3293 total

実装の内容

実装の内容を記述してください

(optional) 考慮事項

起こりうるバグなどがわかっている場合記述してください