diff --git a/trunk/material.f90 b/trunk/material.f90
index 8db56183f..3a97d0838 100644
--- a/trunk/material.f90
+++ b/trunk/material.f90
@@ -85,7 +85,7 @@ subroutine material_init()
    if (minval(microstructure_phase(1:microstructure_Nconstituents(i),i)) < 1 .or. &
        maxval(microstructure_phase(1:microstructure_Nconstituents(i),i)) > material_Nphase) call IO_error(150,i)
    if (minval(microstructure_texture(1:microstructure_Nconstituents(i),i)) < 1 .or. &
-       maxval(microstructure_texture(1:microstructure_Nconstituents(i),i)) > material_Nphase) call IO_error(160,i)
+       maxval(microstructure_texture(1:microstructure_Nconstituents(i),i)) > material_Ntexture) call IO_error(160,i)
    if (sum(microstructure_fraction(:,i)) /= 1.0_pReal) call IO_error(170,i)
  enddo
  write (6,*)