public / Ack-5.5.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Pristine Ack-5.5
[Ack-5.5.git] / lang / fortran / lib / libF77 / r_cos.c
1 #include "f2c.h"
2
3 double r_cos(x)
4 real *x;
5 {
6 double cos();
7 return( cos(*x) );
8 }
Unnamed repository; edit this file 'description' to name the repository.