! read_tables.pct - reads tables for each channel
EOL = a,b,c,z ;
EOI = 0;
!
! Start read loop for channels 1 through nch
!
a:set_nvar	:ichn,1;
!
! Build the tables
!
b:sofie_tblbld :mt,mgs,mdet,tm_ntb,iunit,iblk,ietl,net,not,filene,fileno,
                 tm_tbl,1,ichn,FALSE,mg1;

c:ise		:ichn,nch,1;