110519Sdlw /* 222945Skre * Copyright (c) 1980 Regents of the University of California. 322945Skre * All rights reserved. The Berkeley software License Agreement 422945Skre * specifies the terms and conditions for redistribution. 522945Skre * 6*23854Sjerry * @(#)r_acos.c 5.2 07/08/85 710519Sdlw */ 810519Sdlw 9*23854Sjerry float r_acos(x) 1010519Sdlw float *x; 1110519Sdlw { 1210519Sdlw double acos(); 1310519Sdlw return( acos(*x) ); 1410519Sdlw } 15