Fortran中的tiny函数tiny(x)表示查询x的最小正值,x所能表示的最小的数,近似于0。tiny这个函数的参数,只与类型有关。两个数之间的差,不可能比这个数小。任意两个数 a 和 b,如果他们的差小于tiny(x),则认为这两个数相等。在这里 a 和 b 的类型是一样的,比如tiny(1.0) 和 tiny(1000000.0) 是一样的,而tiny(1.0) 和 tiny(1.0d0) 不一样,tiny(1.0) 比 tiny(1.0d0) 大很多很多倍。换句话说说,双精度可以表达更小更小的数。请看下面这个程序的输出: