& min_x_noStress_SOUTH, max_x_noStress_SOUTH,
_RL min_x_noStress_SOUTH, max_x_noStress_SOUTH
CALL WRITE_0D_RL( max_x_noStress_SOUTH, INDEX_NONE,
& (x .le. max_x_noStress_SOUTH)) THEN
max_x_noStress_SOUTH = 0.