Google
 
Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_FS_1_19910112 - kccdist/lib/pml/tln.c
There are 5 other files named tln.c in the archive. Click here to see a list.
#include <stdio.h>
#include "pml.h"

main()
{
	test(0.0);
	test(FOURTHPI);
	test(HALFPI);
	test(PI);
	test(3.0);
	test(4.0);
}

test(x)
double x;
{
	extern double dsin(), dcos();
	double y, z;

	y = dsin(x);
	z = dcos(x);
	printf("for x = %g, sin() = %g, cos() = %g\n", x, y, z);
}