Como usar CHAR e ICHAR en FORTRAN 90

Algo que siempre olvido, es como hacer la "promoción" de tipos de datos de manera explícita del tipo caractér a entero, que siempre es útil si se quiere usar nombres númerados para crear una serie de archivos.

En FORTRAN 90 existen dos funciones para la promoción de tipos de datos que estan relacionadas con caracteres, CHAR e ICHAR.

CHAR convierte un entero a su equivalente caracter en ASCII, mientras que ICHAR convierte un número entero a su equivalene caracter ASCII.

La consideración a tener en cuenta es que el número entero debe estar entre 0 y 255.

Por ejemplo para generar una cadena de caracteres que involucre un contador se puede con el operador concatenacion que es //. Así, teniendo dos variables caracter (llamados car_a y car_b) y una entera (llamada ent_a) que es el contador, podemos hacer lo siguiente:

car_b = car_a // CHAR(ent_a + 48)
PRINT*, car_b

Se espera que la variable car_b sea mas grande que el tamaño de car_a. La constante 48 que se suma, es suponiendo que ent_a empieza en un valor cuyo equivalente ASCII no es un caracter imprimible, se desplace 48 unidades y se obtenga un caractér imprimible