xref: /csrg-svn/usr.bin/f77/libF77/pow_dd.c (revision 47940)
1*47940Sbostic /*-
2*47940Sbostic  * Copyright (c) 1980 The Regents of the University of California.
3*47940Sbostic  * All rights reserved.
422927Skre  *
5*47940Sbostic  * %sccs.include.proprietary.c%
610511Sdlw  */
710511Sdlw 
8*47940Sbostic #ifndef lint
9*47940Sbostic static char sccsid[] = "@(#)pow_dd.c	5.2 (Berkeley) 04/12/91";
10*47940Sbostic #endif /* not lint */
11*47940Sbostic 
pow_dd(ap,bp)1210511Sdlw double pow_dd(ap, bp)
1310511Sdlw double *ap, *bp;
1410511Sdlw {
1510511Sdlw double pow();
1610511Sdlw 
1710511Sdlw return(pow(*ap, *bp) );
1810511Sdlw }
19