REAL*4 MYARRAY(80)
       REAL*4 FIFTHELE
       EQUIVALENCE (FIFTHELE,MYARRAY(5))

C SET 5TH ELEMENT TO 61
       MYARRAY(5) = 61

C USE THE 5TH ELEMENT IN SOME EQUATION
       X = FIFTHELE-30

C X NOW EQUALS 31, AND MYARRAY(5) ALSO EQUALS 31.


##</code><code>##

$myvar = \$array[0];
$myothervar = $$myvar;