& min_x_noStress_NORTH, max_x_noStress_NORTH,
_RL min_x_noStress_NORTH, max_x_noStress_NORTH
CALL WRITE_0D_RL( min_x_noStress_NORTH, INDEX_NONE,
IF ((x .gt. min_x_noStress_NORTH) .AND.
min_x_noStress_NORTH = 0.