在Fortran95的库函数——三角函数库里面，没有***Sec(Secant 正割= sec(x)=1/cos(x))***之类的三角函数。

所以，Fortran的sec(x)=1/cos(x)表达式，需要经过如下的转换：

  sec(x) = (cos(x)**-1)