Private function in Fortran

Wie kann ich erklären, eine private Funktion in Fortran?

InformationsquelleAutor Graviton | 2008-10-21
  1. 24

    Dies funktioniert nur mit einem Fortran 90 Modul. Im Modul Deklaration, können Sie den Zugriff Grenzen für eine Liste der Variablen und Routinen, die mit den "öffentlichen" und "privaten" keywords. Normalerweise finde ich es hilfreich, um das private-Schlüsselwort von selbst zunächst, die angibt, dass alles, was in dem Modul private, sofern Sie nicht ausdrücklich als öffentlich gekennzeichnet.

    Im code-Beispiel unten subroutine_1() und function_1() sind von außen zugänglich-Modul über die dafür notwendige "use" - Anweisung, aber auch jede andere variable/Unterprogramm/Funktion private.

    module so_example
  implicit none

  private

  public :: subroutine_1
  public :: function_1

contains

  ! Implementation of subroutines and functions goes here  

end module so_example
    InformationsquelleAutor Tim Whitcomb
  2. 3

    Wenn Sie Module verwenden, hier ist die syntax:

    PUBLIC  :: subname-1, funname-2, ...

PRIVATE :: subname-1, funname-2, ...

    Alle Entitäten aufgeführt, die in PRIVATEN, nicht von außen zugänglich des Moduls und alle Entitäten aufgeführt, die in der ÖFFENTLICHKEIT zugegriffen werden kann von außerhalb des Moduls. Alle anderen Personen können in der Standardeinstellung den Zugriff von außerhalb des Moduls. 

    MODULE  Field
  IMPLICIT   NONE

  Integer :: Dimen

  PUBLIC  :: Gravity
  PRIVATE :: Electric, Magnetic

CONTAINS

  INTEGER FUNCTION  Gravity()
    ..........
  END FUNCTION Gravity


  REAL FUNCTION  Electric()
    ..........
  END FUNCTION


  REAL FUNCTION  Magnetic()
    ..........
  END FUNCTION

  ..........

END MODULE  Field
    InformationsquelleAutor Zeus
  3. 2

    Ich habe nie geschrieben, eine Linie von FORTRAN, aber dieser thread über "Eigenes Modul "Verfahren" scheint zu sein, topische, zumindest hoffe ich das. Scheint die Antworten, mindestens.

    jaredor Zusammenfassung:

    Dem public/private-Attribut vorhanden in Module, die in Fortran 90 und höher. Fortran 77 und früher-du bist kein Glück.

    • Ihre verständlich Bescheidenheit, spricht für Sie, aber Sie können mehr endgültiger: Die Antwort ist in diesem thread. Die public/private-Attribut vorhanden in Module, die in Fortran 90 und höher. Fortran 77 und früher-du bist kein Glück.
    InformationsquelleAutor unwind
  4. 1
    Private xxx, yyy, zzz

real function xxx (v)
  ...
end function xxx

integer function yyy()
  ...
end function yyy

subroutine zzz ( a,b,c )
  ...
end subroutine zzz

... 
other stuff that calls them
...
    InformationsquelleAutor SumoRunner
Schreibe einen Kommentar