if (nu.lt.4) then
if (nu.eq.4) then
I nu,
integer nu, bi, bj
if (nu.eq.1) then
if (nu.eq.2) then
if (nu.eq.3) then
if (nu.eq.1.or.nu.eq.4) then
integer nu, kp, bi, bj