Funciones y subrutinas son similares en que ambos son conjuntos de instrucciones que se dan nombres para que puedan ser " llamados" y ejecutados desde cualquier punto del código . FORTRAN viene con un conjunto de funciones preconfigurados diseñados para realizar operaciones matemáticas como encontrar una raíz cuadrada o un valor absoluto , por lo que en lugar de tener que escribir todos los pasos de esta operación cada vez que se los necesita , un programador puede simplemente llamar la función correspondiente y darle todo lo que ella quiere de entrada . Además de estas funciones incorporadas , un programador puede escribir sus propias funciones y subrutinas para realizar cualquier operación que encuentre útil .
Funciones
Una función de FORTRAN es un proceso que lleva uno o más valores como entrada y produce como salida un valor . Por ejemplo , el estándar de la función SQRT FORTRAN encuentra la raíz cuadrada de la entrada y devuelve el resultado como salida :
X = SQRT (A + B )
Esta declaración envía el valor de " A + B "- el resultado de sumar los valores de las variables a y B - a la función SQRT , y asigna el resultado a la variable x . Si A tiene un valor de 3 y B tenía un valor de 1 , por ejemplo, la afirmación anterior se asignará un valor de 2 a X - la raíz cuadrada de 3 1
< br . > Funciones de variables múltiples
Las funciones pueden tener más de una variable como entrada. La función MAX , por ejemplo, devuelve el valor más alto entre aquellos que se le da , por lo que :
M = MAX (X , Y, Z, 10 )
asignaría a M si este valor es mayor de los valores de X, Y , y Z - a menos que todos los tres valores son menos de 10 , en cuyo caso la función devolverá " 10 " a ser asignado a M.
subrutinas
Mientras que las funciones devuelven un único valor - de tal manera que la frase " SQRT ( 4 ) " es funcionalmente equivalente al número " 2 " , y se puede utilizar en expresiones matemáticas como " 2 " sería - subrutinas pueden devolver muchos valores , y no pueden ser utilizados en las expresiones. En cambio , las subrutinas se ejecutan simplemente con el comando CALL, así:
total de llamadas (1,2,3 , SUM)
Esto ejecuta una subrutina llamada total y envía los números 1 , 2 , y 3 , y la suma variable. La propia subrutina TOTALES podría tener este aspecto :
Total SUBRUTINA (X , Y, Z, S )
real X , Y, Z, S
S = X + y + Z
RETURN
End of
la primera línea define aquí la rutina : se llama Total , y espera cuatro valores cuando se le llama, que asigna a las variables X , Y, Z y S. la segunda línea declara estas cuatro variables como números reales , la tercera línea S establece que el valor combinado de X , Y y Z, y la tercera línea salta de la subrutina y regresa al punto en el código donde se llama . En el caso de la línea de llamada anterior , total sería asignar valores de 1 , 2 , y 3 para X, Y , y Z , y a continuación, asignar el total de - 6 - a S , que corresponde a la variable SUM en la llamada line . El efecto de la "TOTAL CALL ( 1,2,3 , SUM) " la línea, por lo tanto, será la de establecer la variable SUM a 6.