Searched refs:mtrden (Results 1 – 5 of 5) sorted by relevance
/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/ |
H A D | PATCH-scor2prt.for-1 | 146 ! * '(i'//char(48+idxb-1)//')')mtrden 149 ! lenbeat = ifnodur(mtrden,'x') 151 if (mtrden .eq. 2) then 159 ! * '(i'//char(48+idxb-1)//')')mtrden 162 ! lenbeat = ifnodur(mtrden,'x') 164 if (mtrden .eq. 2) then
|
H A D | scor2prt.c | 1374 static integer lwbrs, nwbrs, lenbar, ipenew, mtrden; in mbrests_() local 1508 dosetup_(iv, line, &mtrnum, &mtrden, (ftnlen)128); in mbrests_() 1578 mtrden = *(unsigned char *)&line[icden - 1] - 48; in mbrests_() 1614 do_fio(&c__1, (char *)&mtrden, (ftnlen)sizeof(integer)); in mbrests_() 1618 lenbeat = ifnodur_(&mtrden, "x", (ftnlen)1); in mbrests_() 1620 if (mtrden == 2) { in mbrests_() 2519 integer *mtrden, ftnlen line_len) in dosetup_() argument 2621 *mtrden = i_nint(&xdata); in dosetup_()
|
H A D | scor2prt.for | 853 call dosetup(iv,line(1),mtrnum,mtrden) 900 mtrden = ichar(line(1)(icden:icden))-48 908 * '(i'//char(48+idxb-1)//')')mtrden 911 lenbeat = ifnodur(mtrden,'x') 913 if (mtrden .eq. 2) then 1469 subroutine dosetup(iv,line,mtrnum,mtrden) argument 1530 mtrden = nint(xdata)
|
H A D | pmxab.c | 35303 mtrnum, integer *mtrden, ftnlen lineq_len) in readmeter_() argument 35353 *mtrden = 1; in readmeter_() 35355 *mtrden = *(unsigned char *)durq - 48; in readmeter_() 35356 if (*mtrden == 1) { in readmeter_() 35358 *mtrden = *(unsigned char *)durq - 38; in readmeter_() 35407 do_fio(&c__1, (char *)&(*mtrden), (ftnlen)sizeof(integer)); in readmeter_()
|
H A D | pmx270.for | 22385 subroutine readmeter(lineq,iccount,mtrnum,mtrden) argument 22416 mtrden = 1 22418 mtrden = ichar(durq)-48 22419 if (mtrden .eq. 1) then 22421 mtrden = 10+ichar(durq)-48 22440 read(lineq(iccount:iccount+ns-2),'(i'//chax(47+ns)//')')mtrden
|