La sentencia IF aritmética es una sentencia condicional aritmética de tres vías , vista por primera vez en la primera versión de Fortran en 1957, y encontrada en todas las versiones posteriores [a] , y algunos otros lenguajes de programación, como FOCAL . A diferencia de las sentencias IF lógicas que se ven en otros lenguajes, la sentencia Fortran define tres ramas diferentes dependiendo de si el resultado de una expresión es negativo, cero o positivo, en dicho orden, escrito como:
SI ( expresión ) negativo , cero , positivo
Si bien originalmente era el único tipo de declaración IF que se ofrecía en Fortran, la característica se ha utilizado cada vez con menos frecuencia después de que se introdujeran las declaraciones IF lógicas , y finalmente se etiquetó como obsoleta en Fortran 90. A partir de Fortran 2018, ya no es necesario que los compiladores implementen IF aritmético y se considera una característica eliminada. El compilador GNU Fortran ha estado produciendo advertencias para IF aritmético de forma predeterminada desde su lanzamiento 9.1 en 2019. [ cita requerida ]