correction to d4edb38234db8268907f04836d49bb93461b8a88
[OpenFOAM-1.5.x.git] / src / OpenFOAM / dimensionSet / dimensionSetIO.C
blob68344c447cb8ce0baa6c6cb4796aa8cf1b4970eb
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 1991-2008 OpenCFD Ltd.
6      \\/     M anipulation  |
7 -------------------------------------------------------------------------------
8 License
9     This file is part of OpenFOAM.
11     OpenFOAM is free software; you can redistribute it and/or modify it
12     under the terms of the GNU General Public License as published by the
13     Free Software Foundation; either version 2 of the License, or (at your
14     option) any later version.
16     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
19     for more details.
21     You should have received a copy of the GNU General Public License
22     along with OpenFOAM; if not, write to the Free Software Foundation,
23     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
25 \*---------------------------------------------------------------------------*/
27 #include "dimensionSet.H"
28 #include "IOstreams.H"
30 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
32 Foam::dimensionSet::dimensionSet(Istream& is)
34     is >> *this;
38 // * * * * * * * * * * * * * * * IOstream Operators  * * * * * * * * * * * * //
40 Foam::Istream& Foam::operator>>(Istream& is, dimensionSet& dset)
42     // Read begining of dimensionSet
43     if (token(is) != token::BEGIN_SQR)
44     {
45         Info<< "expected a " << token::BEGIN_SQR << " in dimensionSet"
46             << endl << "in stream " << is.info() << endl;
47     }
49     // Read first five dimensions
50     for (int Dimension=0; Dimension<dimensionSet::CURRENT; Dimension++)
51     {
52         is >> dset.exponents_[Dimension];
53     }
55     // Read next token
56     token nextToken(is);
58     // If next token is another number
59     // read last two dimensions
60     // and then read another token for the end of the dimensionSet
61     if (nextToken.isNumber())
62     {
63         dset.exponents_[dimensionSet::CURRENT] = nextToken.number();
64         is >> dset.exponents_[dimensionSet::LUMINOUS_INTENSITY];
65         is >> nextToken;
66     }
67     else
68     {
69         dset.exponents_[dimensionSet::CURRENT] = 0;
70         dset.exponents_[dimensionSet::LUMINOUS_INTENSITY] = 0;
71     }
73     // Check end of dimensionSet
74     if (nextToken != token::END_SQR)
75     {
76         Info<< "expected a " << token::END_SQR << " in dimensionSet"
77             << endl << "in stream " << is.info() << endl;
78     }
80     // Check state of Istream
81     is.check("Istream& operator>>(Istream&, dimensionSet&)");
83     return is;
87 Foam::Ostream& Foam::operator<<(Ostream& os, const dimensionSet& dset)
89     os << token::BEGIN_SQR;
91     for (int Dimension=0; Dimension<dimensionSet::nDimensions-1; Dimension++)
92     {
93         os << dset.exponents_[Dimension] << token::SPACE;
94     }
95     os << dset.exponents_[dimensionSet::nDimensions-1] << token::END_SQR;
97     // Check state of Ostream
98     os.check("Ostream& operator<<(Ostream&, const dimensionSet&)");
100     return os;
104 // ************************************************************************* //