Commit 88f919a0 authored by Giovanni La Mura's avatar Giovanni La Mura
Browse files

Remove redundant definition of VINTS vector

parent 89d2e692

src/cluster/cluster.cpp

+1 −1
Original line number Diff line number Diff line
@@ -638,7 +638,7 @@ void cluster(string config_file, string data_file, string output_path) { 
			    real(c1->sas[i226 - 1][1][1]), imag(c1->sas[i226 - 1][1][1])

			    );

		    for (int j225 = 0; j225 < 16; j225++) { // QUESTION: check that 16 is a fixed dimension

		      c1ao->vint[j225] = c1ao->vints[i226 - 1][j225];

		      c1ao->vint[j225] = c1->vints[i226 - 1][j225];

		    } // j225 loop

		    mmulc(c1ao->vint, cmullr, cmul);

		    fprintf(output, "  MULS\n");

src/include/Commons.h

+0 −2
Original line number Diff line number Diff line
@@ -237,8 +237,6 @@ public: 
  //! \brief QUESTION: definition?

  dcomplex *vintm;

  //! \brief QUESTION: definition?

  dcomplex **vints;

  //! \brief QUESTION: definition?

  dcomplex *vintt;

  //! \brief QUESTION: definition?

  dcomplex **fsac;

src/libnptm/Commons.cpp

+0 −4
Original line number Diff line number Diff line
@@ -131,8 +131,6 @@ C1_AddOns::C1_AddOns(C4 *c4) { 
  vint = new dcomplex[16](); // QUESTION: is dimension 16 generally fixed?

  vintm = new dcomplex[16]();

  vintt = new dcomplex[16]();

  vints = new dcomplex*[nsph];

  for (int vi = 0; vi < nsph; vi++) vints[vi] = new dcomplex[16]();

  fsac = new dcomplex*[2];

  sac = new dcomplex*[2];

  fsacm = new dcomplex*[2];
@@ -169,8 +167,6 @@ C1_AddOns::~C1_AddOns() { 
  delete[] vint;

  delete[] vintm;

  delete[] vintt;

  for (int vi = nsph - 1; vi > -1; vi--) delete[] vints[vi];

  delete[] vints;

  for (int fi = 1; fi > -1; fi--) {

    delete[] fsac[fi];

    delete[] sac[fi];

src/libnptm/clu_subs.cpp

+1 −1
Original line number Diff line number Diff line
@@ -1793,7 +1793,7 @@ void scr2( 
	  for (int ipo2 = 1; ipo2 <= 2; ipo2++) {

	    for (int jpo2 = 1; jpo2 <= 2; jpo2++) {

	      j++;

	      c1ao->vints[i24 - 1][j - 1] = c1->sas[i24 - 1][jpo2 - 1][ipo2 - 1] * cc * cfsq;

	      c1->vints[i24 - 1][j - 1] = c1->sas[i24 - 1][jpo2 - 1][ipo2 - 1] * cc * cfsq;

	    } // jpo2 loop

	  } // ipo2 loop

	} // jpo1 loop