next up previous
Next: Funciones Intrínsecas Up: Nuevas Facilidades del Fortran Previous: Declaraciones

Operaciones Elementales

En Fortran 90 las expresiones pueden contener arreglos sin índices, en este caso los operadores y las funciones actuarán sobre todos los elementos de arreglo, ya que muchas de las funciones de Fortran 77 han sido reescritas para aceptar arreglos en sus argumentos.

    C Fortran 77                      ! Fortran 90
    PROGRAM o_a                       PROGRAM opera_arreglos
      REAL a(100), b(100), c            IMPLICIT NONE
      c=3.0                             REAL :: c
      DO 1, i=1, 100                    REAL, DIMENSION(100) :: a, b
        a(i) = 2.0                      c = 3.0
        b(i) = a(i) +SQRT(a(i))/2.0     a = 2.0
   1 CONTINUE                           b = c + SQRT(a)/2.0
        ...                              ...

Sin embargo estas operaciones están restringidas a arreglos que tengan el mismo rango y los mismos tamaños en cada una de las dimensiones o entre arreglos y escalares.



Kay A. Tucci K.
Tue Apr 13 17:20:44 GMT-0400 1999