read(nin(10:12), '(i3.3)') ibaz1 read(nin(14:16), '(i3.3)') ibaz2