One more TARGET quiz

From: Oskar Enoksson <enok_tabortmig@xxxxxxxxxxxxxx>
Date: Mon, 27 Aug 2007 10:52:49 +0200

My head started spinning again this morning ...

Is it possible to check if two TARGET dummies are associated with the same variable like this? Assume that the actual arguments are TARGETs.

SUBROUTINE FOO(I1,I2)
INTEGER, TARGET :: I1
INTEGER, TARGET :: I2

INTEGER, POINTER :: IP

IP => I1
IF(ASSOCIATED(IP,I2)) WRITE(*,*) 'Yes!'

END SUBROUTINE FOO
.

Follow-Ups:
- Re: One more TARGET quiz
  - From: *** Hendrickson
- Re: One more TARGET quiz
  - From: glen herrmannsfeldt
- Re: One more TARGET quiz
  - From: Arjen Markus

Prev by Date: Re: Why Fortran?
Next by Date: Re: Q for DISLIN people
Previous by thread: How to run *.f95 in Compaq?
Next by thread: Re: One more TARGET quiz
Index(es):
- Date
- Thread