00001 /* _______ __ 00002 / ___/ / ___ __ _ / / ___ 00003 / /__/ _ \/ _ \/ V \/ _ \/ _ \ 00004 \___/_//_/\___/_/_/_/_.__/\___/ 00005 */ 00006 // CHOMBO Copyright (c) 2000-2004, The Regents of the University of 00007 // California, through Lawrence Berkeley National Laboratory (subject to 00008 // receipt of any required approvals from U.S. Dept. of Energy). All 00009 // rights reserved. 00010 // 00011 // Redistribution and use in source and binary forms, with or without 00012 // modification, are permitted provided that the following conditions are met: 00013 // 00014 // (1) Redistributions of source code must retain the above copyright 00015 // notice, this list of conditions and the following disclaimer. 00016 // (2) Redistributions in binary form must reproduce the above copyright 00017 // notice, this list of conditions and the following disclaimer in the 00018 // documentation and/or other materials provided with the distribution. 00019 // (3) Neither the name of Lawrence Berkeley National Laboratory, U.S. 00020 // Dept. of Energy nor the names of its contributors may be used to endorse 00021 // or promote products derived from this software without specific prior 00022 // written permission. 00023 // 00024 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 00025 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 00026 // TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A 00027 // PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER 00028 // OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 00029 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 00030 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 00031 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 00032 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 00033 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 00034 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00035 // 00036 // You are under no obligation whatsoever to provide any bug fixes, 00037 // patches, or upgrades to the features, functionality or performance of 00038 // the source code ("Enhancements") to anyone; however, if you choose to 00039 // make your Enhancements available either publicly, or directly to 00040 // Lawrence Berkeley National Laboratory, without imposing a separate 00041 // written license agreement for such Enhancements, then you hereby grant 00042 // the following license: a non-exclusive, royalty-free perpetual license 00043 // to install, use, modify, prepare derivative works, incorporate into 00044 // other computer software, distribute, and sublicense such Enhancements or 00045 // derivative works thereof, in binary and source code form. 00046 // 00047 // TRADEMARKS. Product and company names mentioned herein may be the 00048 // trademarks of their respective owners. Any rights not expressly granted 00049 // herein are reserved. 00050 // 00051 00052 // 00053 // PhysIBC.H 00054 // ============ 00055 // 00056 // Virtual base class through which a user specifies the initial and boundary 00057 // conditions for a hyperbolic system of PDEs. 00058 // 00059 00060 #ifndef _RAMPIBC_H_ 00061 #define _RAMPIBC_H_ 00062 00063 #include "FArrayBox.H" 00064 #include "REAL.H" 00065 #include "LevelData.H" 00066 #include "ProblemDomain.H" 00067 #include "PhysIBC.H" 00068 00070 00083 class RampIBC: public PhysIBC 00084 { 00085 public: 00087 00089 RampIBC(); 00090 00092 00105 RampIBC(Real& a_smallPressure, 00106 const Real& a_gamma, 00107 const Real& a_alpha, 00108 const Real& a_ms, 00109 const Real& a_xcorner, 00110 const Real& a_artvisc, 00111 const Real& a_riemannSolTol, 00112 const int& a_maxRsIter, 00113 const Real& a_maxMach); 00114 00116 00118 virtual ~RampIBC(); 00119 00121 00134 void setFortranCommon(Real& a_smallPressure, 00135 const Real& a_gamma, 00136 const Real& a_alpha, 00137 const Real& a_ms, 00138 const Real& a_xcorner, 00139 const Real& a_artvisc, 00140 const Real& a_riemannSolTol, 00141 const int& a_maxRsIter, 00142 const Real& a_maxMach); 00143 00145 00150 void setFortranCommonSet(); 00151 00153 00158 PhysIBC *new_physIBC(); 00159 00161 00163 virtual void initialize(LevelData<FArrayBox>& a_U); 00164 00166 00168 virtual void primBC(FArrayBox& a_WGdnv, 00169 const FArrayBox& a_Wextrap, 00170 const FArrayBox& a_W, 00171 const int& a_dir, 00172 const Side::LoHiSide& a_side, 00173 const Real& a_time); 00174 00176 00181 virtual 00182 void setBdrySlopes(FArrayBox& a_dW, 00183 const FArrayBox& a_W, 00184 const int& a_dir, 00185 const Real& a_time); 00186 00188 00190 virtual 00191 void artViscBC(FArrayBox& a_F, 00192 const FArrayBox& a_U, 00193 const FArrayBox& a_divVel, 00194 const int& a_dir, 00195 const Real& a_time); 00196 00197 00198 protected: 00199 // True if the Fortran common block has been set 00200 bool m_isFortranCommonSet; 00201 }; 00202 00203 #endif