FEA_JOBDIR can be called to obtain the file directory where the analysis was run from.
This can be useful if you need to write any additional files.
SUBROUTINE FEA_JOBDIR(JDIR) CHARACTER(LEN=240), INTENT(OUT) :: JDIR ENDSUBROUTINE FEA_JOBDIR