E6A在fortran代码中是什么意思？

Question

我正在尝试做一些有趣的轨道力学，我在Fortan中找到了一些相关的代码，我正在逐行地将它移到Visual。我不明白这是什么

IF(ABS(EPW-TEMP2) .LE. E6A) GO TO 140

这不是变量。我想E6可能是10^6，但是'A‘的意思是什么？

谢谢!

Answer 1

当我搜索这一行代码时，我会得到一些fortran代码列表中的"太空轨道第3号报告“。E6A在例程DRIVER (Page )中被定义为1.E-6。73)

DATA DE2RA,E6A,PI,PIO2,QO,SO,TOTHRD,TWOPI,X3PIO2,XJ2,XJ3,
1 XJ4,XKE,XKMPER,XMNPDA,AE/.174532925E-1,1.E-6,
2 3.14159265,1.57079633,120.0,78.0,.66666667,
4 6.2831853,4.71238898,1.082616E-3,-.253881E-5,
5 -1.65597E-6,.743669161E-1,6378.135,1440.,1.

我看到这段代码已经转换成Java和C，也许您应该使用它们作为引用。