From 2587f261dc3f81d07fb4697e3cd8463f15efb27f Mon Sep 17 00:00:00 2001
From: David Wasley <dlw@ucbvax.Berkeley.EDU>
Date: Fri, 21 Jan 1983 19:17:18 -0800
Subject: [PATCH] date and time created 83/01/21 11:17:18 by dlw

SCCS-vsn: usr.bin/f77/libF77/r_atn2.c 1.1
---
 usr/src/usr.bin/f77/libF77/r_atn2.c | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 usr/src/usr.bin/f77/libF77/r_atn2.c

diff --git a/usr/src/usr.bin/f77/libF77/r_atn2.c b/usr/src/usr.bin/f77/libF77/r_atn2.c
new file mode 100644
index 0000000000..74ed4b5288
--- /dev/null
+++ b/usr/src/usr.bin/f77/libF77/r_atn2.c
@@ -0,0 +1,10 @@
+/*
+ *	"@(#)r_atn2.c	1.1"
+ */
+
+double r_atn2(x,y)
+float *x, *y;
+{
+double atan2();
+return( atan2(*x,*y) );
+}
-- 
2.20.1