Fortran, Subroutinenaufruf

  • [Blockierte Grafik: http://www.freenet.de/freenet/sourcen/0.gif]
    Hallo,

    Ich habe eine Frage Fortran77 betreffend.

    Ich habe einen Subroutinenaufruf:

    ------------------
    CALL XY (a,20,&50) :confused:
    ...
    ...
    ...

    50 c='no'

    ------------------

    Und die dazugehörige Subroutine:
    ----------------
    SUBROUTINE XY (IWERT,K,*) :confused:
    INTEGER*4 IWERT
    CALL AB(19,20,J)
    IF((J.LE.0).OR.(J.GT.K)) RETURN 1
    CALL CD(IWERT,J)
    RETURN
    END

    ----------------

    Wird vorher zur "50" gesprungen, der Wert abgerufen und dieser dann an
    die Subroutine übergeben?

    Was passiert wenn es folgendermaßen aussieht:

    CALL XY (a,20,&60) :confused:
    ...
    ...
    ...

    60 CALL color(red) :confused:


    ------------------

    SUBROUTINE XY (IWERT,K,*) :confused:
    INTEGER*4 IWERT
    CALL AB(19,20,J)
    IF((J.LE.0).OR.(J.GT.K)) RETURN 1
    CALL CD(IWERT,J)
    RETURN
    END

    ----------------

    Wird in dem Fall die Subroutine übergeben? Und wann wird sie
    aufgerufen? Vor oder nach der mit call aufgerufenen?

    Ich hoffe ihr könnt mir weiterhelfen.

    Schönen Gruß, Katrin

Jetzt mitmachen!

Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!