PSS ID Number: 148187
Article Last Modified on 11/2/1999
C Compile options needed: /Zi
MODULE RED
REAL G
END MODULE
PROGRAM RENAME
USE RED, H=>G
REAL A
H = 1.0
A = GREEN()
WRITE (*,*) A
CONTAINS
FUNCTION GREEN
REAL GREEN, S
S = H
GREEN = S
END FUNCTION
END PROGRAM
Additional query words: 4.00
Keywords: kbLangFortran KB148187
Technology: kbAudDeveloper kbFORTRANPower400NT kbFortranSearch kbZNotKeyword8