1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
/////////////////////////////////////////////////////////////
// //
// Copyright (c) 2003-2014 by The University of Queensland //
// Centre for Geoscience Computing //
// http://earth.uq.edu.au/centre-geoscience-computing //
// //
// Primary Business: Brisbane, Queensland, Australia //
// Licensed under the Open Software License version 3.0 //
// http://www.apache.org/licenses/LICENSE-2.0 //
// //
/////////////////////////////////////////////////////////////
#include "RotElasticInteractionGroup.h"
#include "console.h"
//----------------------------------------
// CElasticIGP member functions
//----------------------------------------
void CRotElasticIGP::packInto(CVarMPIBuffer* B) const
{
AIGParam::packInto(B);
B->append(m_kr);
}
CRotElasticIGP* extractRotElasticIGP(AMPIBuffer* B)
{
CRotElasticIGP* res=new CRotElasticIGP;
B->pop_int();
res->setName(B->pop_string());
res->setNormalSpringConst(B->pop_double());
return res;
}
/*!
extract the specific part of CElasticIGP, i.e. without the type info
*/
CRotElasticIGP* extractRotElasticIGP_p(AMPIBuffer* B)
{
CRotElasticIGP* res=new CRotElasticIGP;
res->setName(B->pop_string());
res->setNormalSpringConst(B->pop_double());
return res;
}
ostream& operator<<(ostream& ost,const CRotElasticIGP& B)
{
ost << "CRotElasticIGP\n";
ost << "Normal Spring Constant : " << B.m_kr << endl;
return ost;
}
|
