Reading S22 stress for a specific element from *.fil file

[AK1984]

Hello everyone,

I am using FORTRAN to read the *.fil file and I have this question:

How can I read S22 stress (record 11) for a specific element number

Best Regards,
A.K.

 

[mrgoldthorpe]

The previous record key no. 1 provides the element number, integration point etc.

 

[AK1984]

Thank you for responding,

So if I am looking for say element no. 333, the code will be like this:

IF (KEY.EQ.1) THEN
'Save the index no. of the element
ElementNo=JRRAY(1,3)
DO i=1,JRRAY(1,2)
IF (ElementNo(i) .EQ. 333) THEN
Index=i
END IF
ENDDO
END IF

'Extract the S22 stress for the element
IF (KEY.EQ.11) THEN
Sarray= JRRAY(1,3)
Stress22=Sarray(Index)
END IF

Is that Correct,
Thank you,
A.K.