/**
 * @file   material_brittle_inline_impl.cc
 *
 * @author Aranda Ruiz Josue <josue.arandaruiz@epfl.ch>
 * @author Daniel Pino Muñoz <daniel.pinomunoz@epfl.ch>
 *
 *
 * @brief  Implementation of the inline functions of the material brittle
 *
 * @section LICENSE
 *
 * Copyright (©) 2010-2012, 2014 EPFL (Ecole Polytechnique Fédérale de Lausanne)
 * Laboratory (LSMS - Laboratoire de Simulation en Mécanique des Solides)
 *
 */

/* -------------------------------------------------------------------------- */
template<UInt spatial_dimension>
inline void
 MaterialBrittle<spatial_dimension>::computeStressOnQuad(Matrix<Real> & grad_u,
                                                         Matrix<Real> & grad_v,
                                                         Matrix<Real> & sigma,
                                                         Real & dam,
                                                         Real & sigma_equivalent,
                                                         Real & fracture_stress) {

  MaterialElastic<spatial_dimension>::computeStressOnQuad(grad_u, sigma);

  Real equiv_strain_rate=0.;
  Real volume_change_rate=grad_v.trace();
  if(spatial_dimension==2){
//    if(this->plane_stress){
//      Real e_dot_33 = this->lambda*(volume_change_rate)/(2. * this->mu - this->lambda);
//      volume_change_rate+=e_dot_33;
//      equiv_strain_rate+=2./3.*pow( e_dot_33 - volume_change_rate/3. , 2. );
//    }
//    else
      equiv_strain_rate+=2./3.*pow( volume_change_rate/3. , 2. );
  }

  for(UInt i=0; i<spatial_dimension; ++i)
    for(UInt j=0; j<spatial_dimension; ++j)
      equiv_strain_rate += 2./3. * pow( 0.5*(grad_v(i,j)+grad_v(j,i))-(i==j)*volume_change_rate/3. , 2. );

  equiv_strain_rate=sqrt(equiv_strain_rate);

  fracture_stress=S_0;
  if(equiv_strain_rate>E_0)
    //fracture_stress=A*pow(equiv_strain_rate,3)+B*pow(equiv_strain_rate,2)+C*equiv_strain_rate+D;
    fracture_stress=A;

  Vector<Real> principal_stress(spatial_dimension);
  sigma.eig(principal_stress);
  sigma_equivalent = principal_stress(0);
  for(UInt i=1; i<spatial_dimension; ++i)
    sigma_equivalent = std::max(sigma_equivalent, principal_stress(i));



  /*  Y = 0;
  for (UInt i = 0; i < spatial_dimension; ++i) {
    for (UInt j = 0; j < spatial_dimension; ++j) {
      Y += sigma(i,j) * grad_u(i,j);
    }
  }
  Y *= 0.5;

  if(damage_in_y) Y *= (1 - dam);

  if(yc_limit) Y = std::min(Y, Yc);
  */
  if(!this->is_non_local) {
    computeDamageAndStressOnQuad(sigma, dam, sigma_equivalent, fracture_stress);
  }
}

/* -------------------------------------------------------------------------- */
template<UInt spatial_dimension>
inline void
MaterialBrittle<spatial_dimension>::computeDamageAndStressOnQuad(Matrix<Real> & sigma,
                                                                Real & dam,
                                                                Real & sigma_c,
                                                                Real & fracture_stress) {
  if ( sigma_c > fracture_stress )
    dam = 1.;

  dam = std::min(dam,1.);

  sigma *= 1-dam;
}

/* -------------------------------------------------------------------------- */
template<UInt spatial_dimension>
inline UInt MaterialBrittle<spatial_dimension>::getNbDataForElements(const Array<Element> & elements,
                                                                    SynchronizationTag tag) const {
  AKANTU_DEBUG_IN();

  /*UInt size = 0;
  if(tag == _gst_smm_init_mat) {
    size += sizeof(Real) * this->getModel().getNbQuadraturePoints(elements);
  }
  */ 
  UInt size = MaterialDamage<spatial_dimension>::getNbDataForElements(elements, tag);

  AKANTU_DEBUG_OUT();
  return size;
}

/* -------------------------------------------------------------------------- */
template<UInt spatial_dimension>
inline void MaterialBrittle<spatial_dimension>::packElementData(CommunicationBuffer & buffer,
                                                               const Array<Element> & elements,
                                                               SynchronizationTag tag) const {
  AKANTU_DEBUG_IN();

  /*if(tag == _gst_smm_init_mat) {
    this->packElementDataHelper(Yd, buffer, elements);
    }*/

  MaterialDamage<spatial_dimension>::packElementData(buffer, elements, tag);

  AKANTU_DEBUG_OUT();
}

/* -------------------------------------------------------------------------- */
template<UInt spatial_dimension>
inline void MaterialBrittle<spatial_dimension>::unpackElementData(CommunicationBuffer & buffer,
                                                                 const Array<Element> & elements,
                                                                 SynchronizationTag tag) {
  AKANTU_DEBUG_IN();

  /*if(tag == _gst_smm_init_mat) {
    this->unpackElementDataHelper(Yd, buffer, elements);
    }*/

  MaterialDamage<spatial_dimension>::unpackElementData(buffer, elements, tag);

  AKANTU_DEBUG_OUT();
}