& min_y_noStress_EAST, max_y_noStress_EAST,
_RL min_y_noStress_EAST, max_y_noStress_EAST
CALL WRITE_0D_RL( max_y_noStress_EAST, INDEX_NONE,
& (y .le. max_y_noStress_EAST)) THEN
max_y_noStress_EAST = 0.