Capítulo 8. Funções e Subrotinas - UFMG

TEMP= A
A= B
B= TEMP
RETURN
END SUBROUTINE TROCA
Capítulo 8. Sub-Programas e Módulos 109
chamar esta subrotina com um argumento escalar e um matricial está obviamente errado, uma vez que o
mecanismo de distribuir o valor da variável escalar por uma matriz conformável com o outro argumento não
pode ser aplicado aqui.
Se a referência a uma rotina genérica (seção 8.3.4) é consistente tanto com uma rotina elemental quanto com
uma não-elemental, a segunda versão é invocada, pois espera-se que a versão elemental de uma rotina rode, em
geral, mais lentamente.
Finalmente, uma rotina elemental não pode ser usada como um argumento real de outra rotina.
8.3 Módulos
Uma das novidades mais importantes introduzidas pelo Fortran 90 é um novo tipo de unidade de programa
denominada módulo. Um módulo é um recurso muito poderoso para transferir dados entre sub-programas e
para organizar a arquitetura global de um programa grande e complexo.
A funcionalidade de um módulo pode ser explorada por qualquer unidade de programa que deseja fazer uso
(através de uma instrução USE) dos recursos disponibilizados por este. Os recursos que podem ser incluídos em
um módulo são os seguintes:
Declaração de objetos globais. Módulos devem ser empregados no lugar das declarações COMMON e INCLUDE,
comuns no Fortran 77. Se dados globais são necessários, por exemplo para transferir valores entre rotinas,
então estes são são tornados visíveis sempre que o módulo é usado. Objetos em um módulo podem ser
inicializados com valores estáticos, de tal forma que estes mantêm seu valor em diferentes unidades que
usam o mesmo módulo.
Blocos de interfaces. Na maior parte das situações é vantajoso congregar todos os blocos de interfaces em
um ou poucos módulos e então usar o módulo sempre que uma interface explícita é necessária. Isto pode
realizado em conjunto com a cláusula ONLY.
Rotinas de módulos. Rotinas podem ser definidas internamente em um módulo, sendo estas tornadas acessíveis
a qualquer unidade de programa que USE o módulo. Esta estratégia é mais vantajosa que usar uma
rotina externa porque em um módulo a interface das rotinas internas é sempre explícita.
Acesso controlado a objetos. Variáveis, rotinas e declarações de operadores podem ter a sua visibilidade
controlada por declarações ou atributos de acesso dentro de um módulo. Desta forma, é possível especificar
que um determinado objeto seja visível somente no interior do módulo. Este recurso é freqüentemente
utilizado para impedir que um usuário possa alterar o valor de um objeto de âmbito puramente interno
ao módulo.
Interfaces genéricas. Um módulo pode ser usado para definir um nome genérico para um conjunto de rotinas,
com interfaces distintas, mas que executem todas a mesma função. Interfaces genéricas podem ser usadas
também para estender a funcionalidade de rotinas intrínsecas.
Sobrecarga de operadores. Um módulo pode ser usado também para redefinir a operação executada pelos
operadores intrínsecos da linguagem (= + - * / **) ou para definir novos tipos de operadores.
Extensão semântica. Um módulo de extensão semântica é uma coleção de definições de tipos derivados,
rotinas e operadores sobrecarregados tais que, quando agregados a uma unidade de programa, permitem
que o usuário use esta funcionalidade estendida como se fizesse parte da linguagem padrão.
A forma geral de um módulo é:
MODULE
[CONTAINS
]
END [MODULE []]
Autor: Rudi Gaelzer – IFM/UFPel Impresso: 23 de abril de 2008