La declaración aritmética IF es una declaración aritmética condicional 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 en algunos otros lenguajes de programación, como FOCAL . A diferencia de las sentencias IF lógicas vistas 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 proporcionada en Fortran, la característica se usó cada vez con menos frecuencia después de que se introdujeron las declaraciones IF lógicas y finalmente fue etiquetada como obsoleta en Fortran 90. A partir de Fortran 2018, ya no es necesaria. para 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 versión 9.1 en 2019. [ cita necesaria ]