/*==============================================================================

                                    O  F  E  L  I

                            Object  Finite  Element  Library

  ==============================================================================

   Copyright (C) 1998 - 2004 Rachid Touzani

   This program is free software; you can redistribute it and/or modify it under
   the terms of the GNU General Public License as published by the Free 
   Software Foundation; Version 2 of the License.

   This program is distributed in the hope that it will be useful, but WITHOUT
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
   FOR A PARTICULAR PURPOSE. See the GNU General Public License for more 
   details.

   You should have received a copy of the GNU General Public License 
   along with this program; if not, write to the :

   Free Software Foundation
   Inc., 59 Temple Place - Suite 330
   Boston, MA  02111-1307, USA

  ==============================================================================

                         Implementation of class User for
                            User Defined Functions

  ===============================================================================*/


#include "User.h"

real_t User::BoundaryCondition(const Point<real_t> &x, int code, real_t time, size_t dof)
{
   real_t ret = 0.0;
   real_t a = 10;
   real_t t = exp(time);
   if (code == 1)
     ret = -tanh(a)*(t-1);
   if (code == 2)
     ret =  tanh(a)*(t-1);
   return ret;
}


real_t User::BodyForce(const Point<real_t> &x, real_t time, size_t dof)
{
   real_t a = 10;
   real_t z = cosh(a*x.y);
   real_t t = exp(time);
   return tanh(a*x.y)*(t + 2*a*a*(t-1)/(z*z));
}