integer nCheckLev1, nCheckLev2, nCheckLev3,nCheckLev4
read(2,'(I5,/,I5,/I5,/I5)') nCheckLev1, nCheckLev2, nCheckLev3,
+', 3rd:', nCheckLev3,
if (nCheckLev3 .eq. 1 ) then
uCheckLev3=nCheckLev3