00001 /* @HEADER@ */ 00002 // ************************************************************************ 00003 // 00004 // Sundance 00005 // Copyright 2011 Sandia Corporation 00006 // 00007 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation, 00008 // the U.S. Government retains certain rights in this software. 00009 // 00010 // Redistribution and use in source and binary forms, with or without 00011 // modification, are permitted provided that the following conditions are 00012 // met: 00013 // 00014 // 1. Redistributions of source code must retain the above copyright 00015 // notice, this list of conditions and the following disclaimer. 00016 // 00017 // 2. Redistributions in binary form must reproduce the above copyright 00018 // notice, this list of conditions and the following disclaimer in the 00019 // documentation and/or other materials provided with the distribution. 00020 // 00021 // 3. Neither the name of the Corporation nor the names of the 00022 // contributors may be used to endorse or promote products derived from 00023 // this software without specific prior written permission. 00024 // 00025 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY 00026 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 00027 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 00028 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE 00029 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 00030 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 00031 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 00032 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 00033 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 00034 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 00035 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00036 // 00037 // Questions? Contact Kevin Long (kevin.long@ttu.edu) 00038 // 00039 00040 /* @HEADER@ */ 00041 00042 #include "SundanceAlgebraSpecifier.hpp" 00043 #include "SundanceOut.hpp" 00044 00045 using namespace Sundance; 00046 using namespace std; 00047 using namespace Sundance; 00048 using namespace Teuchos; 00049 00050 00051 00052 00053 AlgebraSpecifier::AlgebraSpecifier() 00054 : EnumTypeField<AlgebraType>(ScalarAT), 00055 direction_(-1) 00056 {} 00057 00058 AlgebraSpecifier::AlgebraSpecifier(int direction) 00059 : EnumTypeField<AlgebraType>(CoordCompAT), 00060 direction_(direction) 00061 {} 00062 00063 AlgebraSpecifier::AlgebraSpecifier( 00064 const AlgebraType& at) 00065 : EnumTypeField<AlgebraType>(at), direction_(-1) 00066 { 00067 assertNotType(CoordCompAT); 00068 } 00069 00070 int AlgebraSpecifier::direction() const 00071 { 00072 assertType(CoordCompAT); 00073 return direction_; 00074 } 00075 00076 bool AlgebraSpecifier::operator<(const AlgebraSpecifier& other) const 00077 { 00078 if (type() < other.type()) return true; 00079 if (type() > other.type()) return false; 00080 00081 if (isCoordinateComponent()) 00082 return direction() < other.direction(); 00083 return false; 00084 } 00085 00086 string AlgebraSpecifier::toString() const 00087 { 00088 TeuchosOStringStream os; 00089 os << *this; 00090 return os.str(); 00091 } 00092 00093 namespace std 00094 { 00095 00096 ostream& operator<<(std::ostream& os, 00097 const Sundance::AlgebraType& at) 00098 { 00099 switch(at) 00100 { 00101 case ScalarAT: 00102 os << "Scalar"; 00103 break; 00104 case VectorAT: 00105 os << "Vector"; 00106 break; 00107 case CoordCompAT: 00108 os << "CoordComp"; 00109 break; 00110 case NormalAT: 00111 os << "Normal"; 00112 break; 00113 default: 00114 TEUCHOS_TEST_FOR_EXCEPT(1); 00115 } 00116 return os; 00117 } 00118 00119 ostream& operator<<(std::ostream& os, const Sundance::AlgebraSpecifier& as) 00120 { 00121 os << as.type(); 00122 if (as.isCoordinateComponent()) os << "(d=" << as.direction() << ")"; 00123 else os << "()"; 00124 return os; 00125 } 00126 00127 } 00128 00129 namespace Sundance 00130 { 00131 00132 /** \relates AlgebraSpecifier */ 00133 AlgebraSpecifier vectorAlgebraSpec() 00134 { 00135 return AlgebraSpecifier(VectorAT); 00136 } 00137 00138 /** AlgebraSpecifier */ 00139 AlgebraSpecifier scalarAlgebraSpec() 00140 { 00141 return AlgebraSpecifier(ScalarAT); 00142 } 00143 00144 /** AlgebraSpecifier */ 00145 AlgebraSpecifier normalAlgebraSpec() 00146 { 00147 return AlgebraSpecifier(NormalAT); 00148 } 00149 00150 /** AlgebraSpecifier */ 00151 AlgebraSpecifier coordAlgebraSpec(int dir) 00152 { 00153 return AlgebraSpecifier(dir); 00154 } 00155 00156 }