/*
**  -*- C -*-
**
** dtanhs.c
** Made by  Bruno JOFRET <bruno.jofret@inria.fr>
**
** Started on  Thu Dec  7 12:02:41 2006 jofret
** Last update Mon Jan 29 17:05:08 2007 jofret
**
** Copyright INRIA 2006
*/

#include <math.h>

double	       dtanhs(double x) {
  return (tanh(x));
}