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

116 8.3. Módulos
Outra maneira de se estabelecer o controle de acesso é através de declarações, as quais listam os nomes dos
objetos que são públicos ou privados:
PUBLIC :: X, Y, Z
PRIVATE :: U, V, W
A forma geral da declaração é:
PUBLIC [[::] ]
PRIVATE [[::] ]
Caso nenhum controle é estabelecido em um módulo, seja através de um atributo ou de uma declaração, todas
as entidades têm o atributo PUBLIC.
Se uma declaração PUBLIC ou PRIVATE não possui uma lista de entidades, esta confirma ou altera o acesso
padrão. Assim, a declaração
PUBLIC
confirma o acesso padrão, ao passo que a declaração
PRIVATE
altera o acesso padrão. Desta forma, uma seqüência de declarações como as abaixo:
...
PRIVATE
PUBLIC
...
confere aos nomes na o atributo PUBLIC enquanto que todas as entidades restantes no módulo
são privadas, podendo ser acessadas somente dentro do âmbito do módulo.
8.3.4 Interfaces e rotinas genéricas
Outro recurso poderoso introduzido pelo Fortran 90 é a habilidade do programador definir suas próprias
rotinas genéricas, de tal forma que um único nome é suficiente para invocar uma determinada rotina, enquanto
que a ação que realmente é executada quando este nome é usado depende do tipo de seus argumentos. Embora
possam ser declaradas em quaisquer unidades de programa, rotinas genéricas são usualmente definidas em
módulos.
Uma rotina genérica é definido usando-se um bloco interfaces e um nome genérico é usado para todas as
rotinas definidas dentro deste bloco de interfaces. Assim, a forma geral é:
INTERFACE
...
END INTERFACE
onde , etc, são os blocos das interfaces das rotinas específicas, isto
é, que se referem a um dado conjunto de tipos de variáveis, e que são acessadas através do .
As rotinas per se podem se encontrar em outras unidades; por exemplo, elas podem ser rotinas externas. O uso
do no final do bloco somente é permitido a partir do Fortran 95.
Como um módulo é a unidade de programa ideal para armazenar todas estas rotinas específicas relacionadas
entre si e como as interfaces das rotinas de módulo são sempre explícitas, estas rotinas genéricas são, em geral,
definidas dentro de módulos. Neste caso, a declaração
MODULE PROCEDURE
é incluída no bloco de interface para nomear as rotinas de módulo que são referidas através do nome genérico.
Assim, a declaração geral é:
Autor: Rudi Gaelzer – IFM/UFPel Impresso: 23 de abril de 2008