File: vect4.cpp

package info (click to toggle)
lammps 20220106.git7586adbb6a%2Bds1-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 348,064 kB
  • sloc: cpp: 831,421; python: 24,896; xml: 14,949; f90: 10,845; ansic: 7,967; sh: 4,226; perl: 4,064; fortran: 2,424; makefile: 1,501; objc: 238; lisp: 163; csh: 16; awk: 14; tcl: 6
file content (136 lines) | stat: -rw-r--r-- 3,497 bytes parent folder | download
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
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
/*
 *_________________________________________________________________________*
 *      POEMS: PARALLELIZABLE OPEN SOURCE EFFICIENT MULTIBODY SOFTWARE     *
 *      DESCRIPTION: SEE READ-ME                                           *
 *      FILE NAME: vect4.cpp                                               *
 *      AUTHORS: See Author List                                           *
 *      GRANTS: See Grants List                                            *
 *      COPYRIGHT: (C) 2005 by Authors as listed in Author's List          *
 *      LICENSE: Please see License Agreement                              *
 *      DOWNLOAD: Free at www.rpi.edu/~anderk5                             *
 *      ADMINISTRATOR: Prof. Kurt Anderson                                 *
 *                     Computational Dynamics Lab                          *
 *                     Rensselaer Polytechnic Institute                    *
 *                     110 8th St. Troy NY 12180                           *
 *      CONTACT:        anderk5@rpi.edu                                    *
 *_________________________________________________________________________*/

#include "vect4.h"
#include <cstdlib>

using namespace std;

Vect4::Vect4(){
  numrows = 4; numcols = 1;
}
Vect4::~Vect4(){
}

Vect4::Vect4(const Vect4& A){  // copy constructor
  numrows = 4; numcols = 1;

  elements[0] = A.elements[0];
  elements[1] = A.elements[1];
  elements[2] = A.elements[2];
  elements[3] = A.elements[3];
}

Vect4::Vect4(const VirtualMatrix& A){  // copy constructor
  numrows = 4; numcols = 1;

  // error check
  if( (A.GetNumRows() != 4) || (A.GetNumCols() != 1) ){
    cerr << "illegal matrix size" << endl;
    exit(0);
  }

  for(int i=0;i<4;i++)
    elements[i] = A.BasicGet(i,0);
}

double& Vect4::operator_1int (int i){ // array access
  return elements[i-1];
}

double Vect4::Get_1int(int i) const{
  return elements[i-1];
}

void Vect4::Set_1int(int i, double value){
  elements[i-1] = value;
}

double Vect4::BasicGet_1int(int i) const{
  return elements[i];
}

void Vect4::BasicSet_1int(int i, double value){
  elements[i] = value;
}

void Vect4::BasicIncrement_1int(int i, double value){
  elements[i] += value;
}

void Vect4::Const(double value){
  elements[0] = value;
  elements[1] = value;
  elements[2] = value;
  elements[3] = value;
}

MatrixType Vect4::GetType() const{
  return VECT4;
}

istream& Vect4::ReadData(istream& c){  //input
  for(int i=0;i<4;i++)
    c >> elements[i];
  return c;
}

ostream& Vect4::WriteData(ostream& c) const{  //output
  for(int i=0;i<4;i++)
    c << elements[i] << ' ';
  return c;
}

void Vect4::AssignVM(const VirtualMatrix& A){
  // error check
  if( (A.GetNumRows() != 4) || (A.GetNumCols() != 1) ){
    cerr << "illegal matrix size" << endl;
    exit(0);
  }

  for(int i=0;i<numrows;i++)
    elements[i] = A.BasicGet(i,0);
}

Vect4& Vect4::operator=(const Vect4& A){ // assignment operator
  elements[0] = A.elements[0];
  elements[1] = A.elements[1];
  elements[2] = A.elements[2];
  elements[3] = A.elements[3];
  return *this;
}

Vect4& Vect4::operator=(const VirtualMatrix& A){ // overloaded =
  // error check
  if( (A.GetNumRows() != 4) || (A.GetNumCols() != 1) ){
    cerr << "illegal matrix size" << endl;
    exit(0);
  }

  for(int i=0;i<numrows;i++)
    elements[i] = A.BasicGet(i,0);
  return *this;
}

Vect4& Vect4::operator*=(double b){
  elements[0] *= b;
  elements[1] *= b;
  elements[2] *= b;
  elements[3] *= b;
  return *this;
}