Method setTranLocalBasic

SRC/element/twoNodeLink/TwoNodeLinkSection.cpp:1305–1343

set transformation matrix from local to basic system

// set transformation matrix from local to basic system
void TwoNodeLinkSection::setTranLocalBasic()
{
  int numDIR = theSection->getOrder();
  const ID &type = theSection->getType();
  
  // resize transformation matrix and zero it
  Tlb.resize(numDIR,numDOF);
  Tlb.Zero();

  for (int i=0; i<numDIR; i++)  {
    int dirID = this->getDirID(type(i));

    Tlb(i,dirID) = -1.0;
    Tlb(i,dirID+numDOF/2) = 1.0;
    
    // switch on dimensionality of element
    switch (elemType)  {
    case D2N6:
      if (dirID == 1)  {
	Tlb(i,2) = -shearDistI(0)*L;
	Tlb(i,5) = -(1.0 - shearDistI(0))*L;
      }
      break;
    case D3N12:
      if (dirID == 1)  {
	Tlb(i,5)  = -shearDistI(0)*L;
	Tlb(i,11) = -(1.0-shearDistI(0))*L;
      }
      else if (dirID == 2)  {
	Tlb(i,4)  = shearDistI(1)*L;
	Tlb(i,10) = (1.0-shearDistI(1))*L;
      }
      break;
    default :
      // do nothing
      break;
    }
  }
}

int TwoNodeLinkSection::getDirID(int sectionCode)
{