xref: /csrg-svn/usr.bin/f77/libF77/d_sinh.c (revision 22873)
110468Sdlw /*
2*22873Skre  * Copyright (c) 1980 Regents of the University of California.
3*22873Skre  * All rights reserved.  The Berkeley software License Agreement
4*22873Skre  * specifies the terms and conditions for redistribution.
5*22873Skre  *
6*22873Skre  *	@(#)d_sinh.c	5.1	06/07/85
710468Sdlw  */
810468Sdlw 
910468Sdlw double d_sinh(x)
1010468Sdlw double *x;
1110468Sdlw {
1210468Sdlw double sinh();
1310468Sdlw return( sinh(*x) );
1410468Sdlw }
15