FORTRAN中sin()的源代码

boo*_*see 3 implementation fortran trigonometry function

我想知道如何在FORTRAN中实现内置函数sin(),因为我尝试编写可以接收标量和数组作为其输入变量的函数,其效果可以在sin()中找到,即sin (0)返回0和sin(a),其中数组a =(/ 0,3.14 ...),返回一个数组(0,0).

我希望我要编写的所有数学函数都具有这种灵活性和优势.有人可以帮我一个忙吗?

mgi*_*son 5

你可以做一个elemental功能