/*
**  -*- C -*-
**
** dcoss.c
** Made by  Bruno JOFRET <bruno.jofret@inria.fr>
**
** Started on  Thu Dec  7 12:02:41 2006 jofret
** Last update Thu Dec  7 17:33:14 2006 jofret
**
** Copyright INRIA 2006
*/

#include <math.h>

double	       dcoss(double x) {
  return (cos(x));
}