PSS ID Number: 147750
Article Last Modified on 11/2/1999
C Compile options needed: /Zi
PROGRAM ASSUMED_SHAPE
CHARACTER(LEN = 10),DIMENSION(5)::H
H = 'AAAAAAAAAA'
CALL SUB(H)
WRITE(*,*)'Done debugging...'
CONTAINS
SUBROUTINE SUB(I)
CHARACTER(LEN = 10),DIMENSION(:)::I
I(1) = 'BBBBBBBBBB'
RETURN
END SUBROUTINE SUB
END PROGRAM ASSUMED_SHAPE
Additional query words: 4.00
Keywords: kbLangFortran KB147750
Technology: kbAudDeveloper kbFORTRANPower400NT kbFortranSearch kbZNotKeyword8