如何指定Fortran中BOZ常量的大小以消除编译警告？

问题场景 #

处理NOAA的免费软件库NCEPLIBS-g2（供气象学家、气候科学家访问GRIB2数据）时，编译出现如下类型转换警告：

121 | allones = Z'FFFFFFFF'
| 1
Warning: Conversion from ‘INTEGER(16)’ to ‘INTEGER(4)’ at (1) [-Wconversion]

对应代码片段：

integer(4) :: ire00, allones

allones = Z'FFFFFFFF'

问题核心是BOZ常量Z'FFFFFFFF'被编译器默认识别为INTEGER(16)类型，赋值给INTEGER(4)变量时触发隐式转换警告。

解决方案 #

以下几种方法可将BOZ常量显式指定为INTEGER(4)类型，消除警告：

方法1：使用显式类型转换函数 #

通过INT函数强制转换常量类型：

allones = INT(Z'FFFFFFFF', KIND=4)

部分编译器（如GNU Fortran）支持更简洁的INT4函数：

allones = INT4(Z'FFFFFFFF')

方法2：添加类型后缀（Fortran 2008+） #

在BOZ常量后直接追加_4后缀，指定其KIND为4（即INTEGER(4)）：

allones = Z'FFFFFFFF'_4

主流编译器（GNU Fortran、Intel Fortran等）均支持该Fortran 2008标准特性。

方法3：定义参数化常量（适合重复使用场景） #

提前定义带类型的参数化常量，后续直接引用：

integer(4), parameter :: ALLONES_CONST = Z'FFFFFFFF'_4
allones = ALLONES_CONST

内容的提问来源于stack exchange，提问作者Edward Hartnett