Commit 7ad971ab authored by Giovanni La Mura's avatar Giovanni La Mura
Browse files

Adapt common blocks structure to cluster case

parent 5a1fc42e

src/include/Commons.h

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

	std::complex<double> *vj0;

	//! \brief QUESTION: definition?

	std::complex<double> *vj;

	//! \brief QUESTION: definition?

	std::complex<double> *vyhj;

	//! \brief QUESTION: definition?

	std::complex<double> *vyj0;

src/libnptm/Commons.cpp

+1 −0
Original line number Diff line number Diff line
@@ -99,6 +99,7 @@ C1_AddOns::C1_AddOns(C4 *c4) { 
	nlemt = 2 * c4->nlem;

	vh = new complex<double>[(nsph * nsph - 1) * c4->litpo];

	vj0 = new complex<double>[nsph * c4->lmtpo];

	vj = new complex<double>[1]; // QUESTION: is 1 really enough for a general case?

	vyhj = new complex<double>[nsph * (nsph - 1) * c4->litpo];

	vyj0 = new complex<double>[nsph * c4->lmtpo];

	am0m = new complex<double>*[nlemt];