142217Sbostic/*- 2*61285Sbostic * Copyright (c) 1990, 1993 3*61285Sbostic * The Regents of the University of California. All rights reserved. 442217Sbostic * 542217Sbostic * This code is derived from software contributed to Berkeley by 642217Sbostic * the Systems Programming Group of the University of Utah Computer 742217Sbostic * Science Department. 842217Sbostic * 942217Sbostic * %sccs.include.redist.c% 1042217Sbostic * 11*61285Sbostic * @(#)cosh.s 8.1 (Berkeley) 06/04/93 1242217Sbostic */ 1342217Sbostic 1442217Sbostic/* cosh(x) */ 1542217Sbostic 1642217Sbostic .text 1742217Sbostic .globl _cosh 1842217Sbostic 1942217Sbostic_cosh: 2042217Sbostic fcoshd sp@(4),fp0 2142217Sbostic fmoved fp0,sp@- 2242217Sbostic movel sp@+,d0 2342217Sbostic movel sp@+,d1 2442217Sbostic rts 25