.MCAD 304020000 1 74 393 0
.CMD PLOTFORMAT
0 0 1 1 1 0 0 1 1 
0 0 1 1 1 0 0 1 1 
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
0 1 1 21 15 0 0 3 
.CMD FORMAT  rd=d ct=10 im=i et=3 zt=15 pr=3 mass length time charge temperature tr=0 vm=0
.CMD SET ORIGIN 0
.CMD SET TOL 0.001000000000000
.CMD SET PRNCOLWIDTH 8
.CMD SET PRNPRECISION 4
.CMD PRINT_SETUP 1.200000 1.218750 1.200000 1.200000 0
.CMD HEADER_FOOTER 1 1 *empty* *empty* *empty* 0 1 *empty* *empty* *empty*
.CMD HEADER_FOOTER_FONT fontID=14 family=Arial points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD HEADER_FOOTER_FONT fontID=15 family=Arial points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFAULT_TEXT_PARPROPS 0 0 0
.CMD DEFINE_FONTSTYLE_NAME fontID=0 name=Variables
.CMD DEFINE_FONTSTYLE_NAME fontID=1 name=Constants
.CMD DEFINE_FONTSTYLE_NAME fontID=2 name=Text
.CMD DEFINE_FONTSTYLE_NAME fontID=4 name=User^1
.CMD DEFINE_FONTSTYLE_NAME fontID=5 name=User^2
.CMD DEFINE_FONTSTYLE_NAME fontID=6 name=User^3
.CMD DEFINE_FONTSTYLE_NAME fontID=7 name=User^4
.CMD DEFINE_FONTSTYLE_NAME fontID=8 name=User^5
.CMD DEFINE_FONTSTYLE_NAME fontID=9 name=User^6
.CMD DEFINE_FONTSTYLE_NAME fontID=10 name=User^7
.CMD DEFINE_FONTSTYLE fontID=0 family=Times^New^Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=1 family=Times^New^Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=2 family=Arial points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=4 family=Arial points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=5 family=Courier^New points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=6 family=System points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=7 family=Script points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=8 family=Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=9 family=Modern points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=10 family=Times^New^Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD UNITS U=1
.CMD DIMENSIONS_ANALYSIS 0 0
.CMD COLORTAB_ENTRY 0 0 0
.CMD COLORTAB_ENTRY 128 0 0
.CMD COLORTAB_ENTRY 0 128 0
.CMD COLORTAB_ENTRY 128 128 0
.CMD COLORTAB_ENTRY 0 0 128
.CMD COLORTAB_ENTRY 128 0 128
.CMD COLORTAB_ENTRY 0 128 128
.CMD COLORTAB_ENTRY 128 128 128
.CMD COLORTAB_ENTRY 192 192 192
.CMD COLORTAB_ENTRY 255 0 0
.CMD COLORTAB_ENTRY 0 255 0
.CMD COLORTAB_ENTRY 255 255 0
.CMD COLORTAB_ENTRY 0 0 255
.CMD COLORTAB_ENTRY 255 0 255
.CMD COLORTAB_ENTRY 0 255 255
.CMD COLORTAB_ENTRY 255 255 255
.TXT 2 1 2 0 0
Cg a73.000000,73.000000,908
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard File Name: 408_ca5.mcd
\par Written by Dr. James S. Kang, Professor, ECE Department, Cal Poly 
Pomona.\par This program simulates the operation of TMS320C5x DSK when 
a digital Butterworth lowpass \par filter is implemented in direct 
form I and direct form II.\par The specifications for the Butterworth 
lowpass filter are: amax = 3 dB, amin = 12 dB, \par fplpf = 1000 Hz, 
fslpf = 2000 Hz, fs = 10080 Hz.  Using filter.mcd file, we get\par 
H(z) = (1 + 2z{\up -1} + z{\up -2})/(1-1.148582559z{\up -1}+0.4152837476z{
\up -2})\par maxb = 14.998, 1/maxb = 0.067  \par \pard The 
specifications for the Butterworth highpass filter are: amax = 3 dB, 
amin = 12 dB, \par fplpf = 1000 Hz, fslpf = 2000 Hz, fs = 10080 Hz.  
Using filter.mcd file, we get\par H(z) = (1 - 2z{\up -1} + z{\up -2}
)/(1-0.382691z{\up -1}+0.197582z{\up -2})\par \pard maxb = 2.531, 
1/maxb = 0.395\par Change fn from 0 to 0.5 at an interval of 0.1 and 
compare the input and the various outputs. \par Change A to 5 and 
compare the input and the various outputs. }
.TXT 32 0 295 0 0
Cg a72.000000,72.000000,13
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard Direct Form I}
.TXT 3 0 293 0 0
Cg a73.000000,73.000000,18
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard Fractional Numbers}
.EQN 3 0 3 0 0
{0:ym1}NAME:0
.EQN 0 10 4 0 0
{0:ym2}NAME:0
.EQN 0 10 6 0 0
{0:xm1}NAME:0
.EQN 0 9 7 0 0
{0:xm2}NAME:0
.EQN 0 9 14 0 0
{0:N}NAME:20
.EQN 0 10 62 0 0
{0:fn}NAME:0.1
.EQN 0 9 298 0 0
{0:A}NAME:1
.EQN 4 -57 42 0 0
{0:a1}NAME:-1.148582559
.EQN 0 14 52 0 0
{0:a2}NAME:0.4152837476
.EQN 0 15 235 0 0
{0:b0}NAME:1
.EQN 0 12 236 0 0
{0:b1}NAME:2
.EQN 0 12 237 0 0
{0:b2}NAME:1
.EQN 4 -53 56 0 0
{0:maxb}NAME:14.998
.EQN 0 13 57 0 0
{0:b0}NAME:({0:b0}NAME)/({0:maxb}NAME)
.EQN 0 11 58 0 0
{0:b1}NAME:({0:b1}NAME)/({0:maxb}NAME)
.EQN 0 11 59 0 0
{0:b2}NAME:({0:b2}NAME)/({0:maxb}NAME)
.EQN 5 -35 67 0 0
{0:round}NAME({0:x}NAME):{0:if}NAME({0:x}NAME-{0:floor}NAME({0:x}NAME)ó0.5,{0:floor}NAME({0:x}NAME),{0:ceil}NAME({0:x}NAME))
.EQN 0 34 72 0 0
{0:fn}NAME:|({0:fn}NAME-{0:round}NAME({0:fn}NAME))
.EQN 5 -34 234 0 0
{0:k}NAME:0;{0:N}NAME
.EQN 4 0 61 0 0
({0:x}NAME)[({0:k}NAME):{0:A}NAME*{0:cos}NAME(2*{0:\p}NAME*{0:fn}NAME*{0:k}NAME)
.EQN 4 0 11 0 0
({0:y}NAME)[(0):-{0:a1}NAME*{0:ym1}NAME-{0:a2}NAME*{0:ym2}NAME+{0:b0}NAME*({0:x}NAME)[(0)+{0:b1}NAME*{0:xm1}NAME+{0:b2}NAME*{0:xm2}NAME
.EQN 4 0 49 0 0
({0:y}NAME)[(1):-{0:a1}NAME*({0:y}NAME)[(0)-{0:a2}NAME*{0:ym1}NAME+{0:b0}NAME*({0:x}NAME)[(1)+{0:b1}NAME*({0:x}NAME)[(0)+{0:b2}NAME*{0:xm1}NAME
.EQN 3 0 299 0 0
{0:k}NAME:2;{0:N}NAME
.EQN 3 0 300 0 0
({0:y}NAME)[({0:k}NAME):-{0:a1}NAME*({0:y}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:y}NAME)[({0:k}NAME-2)+{0:b0}NAME*({0:x}NAME)[({0:k}NAME)+{0:b1}NAME*({0:x}NAME)[({0:k}NAME-1)+{0:b2}NAME*({0:x}NAME)[({0:k}NAME-2)
.EQN 4 0 301 0 0
{0:k}NAME:0;{0:N}NAME
.EQN 1 0 302 0 0
&&(_n_u_l_l_&_n_u_l_l_)&({0:x}NAME)[({0:k}NAME),({0:y}NAME)[({0:k}NAME)@&&(_n_u_l_l_&_n_u_l_l_)&{0:k}NAME
0 0 1 1 1 0 0 1 1 
0 0 1 1 1 0 0 1 1 
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
0 1 1 49 15 10 0 3 
.TXT 30 0 287 0 0
Cg a73.000000,73.000000,30
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard Fractional Numbers 
Scaled by S}
.EQN 5 0 288 0 0
{0:S}NAME:(2)^(14)
.EQN 0 13 289 0 0
({0:xs1}NAME)[({0:k}NAME):{0:S}NAME*({0:x}NAME)[({0:k}NAME)
.EQN 3 -13 290 0 0
({0:ys1}NAME)[({0:k}NAME):{0:S}NAME*({0:y}NAME)[({0:k}NAME)
.EQN 2 3 291 0 0
&&(_n_u_l_l_&_n_u_l_l_)&({0:xs1}NAME)[({0:k}NAME),({0:ys1}NAME)[({0:k}NAME)@&&(_n_u_l_l_&_n_u_l_l_)&{0:k}NAME
0 0 1 1 1 0 0 1 1 
0 0 1 1 1 0 0 1 1 
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
0 1 1 49 15 10 0 3 
.TXT 25 -3 248 0 0
Cg a72.000000,72.000000,31
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard Integer Arithmetic 
Scaled by S1}
.EQN 5 0 139 0 0
{0:S1}NAME:(2)^(14)
.EQN 0 10 140 0 0
{0:S2}NAME:(2)^(14)
.EQN 4 -10 141 0 0
{0:k}NAME:0;{0:N}NAME
.EQN 0 10 142 0 0
{0:b0}NAME:{0:S1}NAME*{0:b0}NAME
.EQN 0 10 143 0 0
{0:b1}NAME:{0:S1}NAME*{0:b1}NAME
.EQN 0 11 144 0 0
{0:b2}NAME:{0:S1}NAME*{0:b2}NAME
.EQN 0 11 145 0 0
{0:a1}NAME:{0:S1}NAME*{0:a1}NAME
.EQN 0 11 146 0 0
{0:a2}NAME:{0:S1}NAME*{0:a2}NAME
.EQN 5 -53 88 0 0
({0:xs2}NAME)[({0:k}NAME):{0:S1}NAME*{0:A}NAME*{0:cos}NAME(2*{0:\p}NAME*{0:fn}NAME*{0:k}NAME)
.TXT 4 45 249 0 0
Cg a28.000000,28.000000,42
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard floor function truncates 
fractional \par part.}
.EQN 1 -45 111 0 0
({0:ys2}NAME)[(0):{0:floor}NAME((-{0:a1}NAME*{0:ym1}NAME-{0:a2}NAME*{0:ym2}NAME+{0:b0}NAME*({0:xs2}NAME)[(0)+{0:b1}NAME*{0:xm1}NAME+{0:b2}NAME*{0:xm2}NAME)/({0:S2}NAME))
.EQN 6 0 112 0 0
({0:ys2}NAME)[(1):{0:floor}NAME((-{0:a1}NAME*({0:ys2}NAME)[(0)-{0:a2}NAME*{0:ym1}NAME+{0:b0}NAME*({0:xs2}NAME)[(1)+{0:b1}NAME*({0:xs2}NAME)[(0)+{0:b2}NAME*{0:xm1}NAME)/({0:S2}NAME))
.EQN 6 0 113 0 0
{0:k}NAME:2;{0:N}NAME
.EQN 6 0 114 0 0
({0:ys2}NAME)[({0:k}NAME):{0:floor}NAME((-{0:a1}NAME*({0:ys2}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:ys2}NAME)[({0:k}NAME-2)+{0:b0}NAME*({0:xs2}NAME)[({0:k}NAME)+{0:b1}NAME*({0:xs2}NAME)[({0:k}NAME-1)+{0:b2}NAME*({0:xs2}NAME)[({0:k}NAME-2))/({0:S2}NAME))
.TXT 7 0 268 0 0
Cg a72.000000,72.000000,29
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard With scaling and modulo 32768}
.EQN 7 0 263 0 0
({0:ys3}NAME)[(0):{0:mod}NAME({0:floor}NAME((-{0:a1}NAME*{0:ym1}NAME-{0:a2}NAME*{0:ym2}NAME+{0:b0}NAME*({0:xs2}NAME)[(0)+{0:b1}NAME*{0:xm1}NAME+{0:b2}NAME*{0:xm2}NAME)/({0:S2}NAME)),32768)
.EQN 6 0 264 0 0
({0:ys3}NAME)[(1):{0:mod}NAME({0:floor}NAME((-{0:a1}NAME*({0:ys2}NAME)[(0)-{0:a2}NAME*{0:ym1}NAME+{0:b0}NAME*({0:xs2}NAME)[(1)+{0:b1}NAME*({0:xs2}NAME)[(0)+{0:b2}NAME*{0:xm1}NAME)/({0:S2}NAME)),32768)
.EQN 8 0 277 0 0
{0:k}NAME:2;{0:N}NAME
.EQN 5 0 281 0 0
({0:ys3}NAME)[({0:k}NAME):{0:mod}NAME({0:floor}NAME((-{0:a1}NAME*({0:ys2}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:ys2}NAME)[({0:k}NAME-2)+{0:b0}NAME*({0:xs2}NAME)[({0:k}NAME)+{0:b1}NAME*({0:xs2}NAME)[({0:k}NAME-1)+{0:b2}NAME*({0:xs2}NAME)[({0:k}NAME-2))/(
{0:S2}NAME)),32768)
.EQN 5 0 282 0 0
{0:k}NAME:0;{0:N}NAME
.EQN 2 7 361 0 0
({0:y}NAME)[({0:k}NAME)=
.EQN 0 13 362 0 0
({0:ys1}NAME)[({0:k}NAME)=
.EQN 0 14 363 0 0
({0:ys2}NAME)[({0:k}NAME)=
.EQN 0 14 364 0 0
({0:ys3}NAME)[({0:k}NAME)=
.EQN 61 -48 365 0 0
&&(_n_u_l_l_&_n_u_l_l_)&({0:xs2}NAME)[({0:k}NAME),({0:ys2}NAME)[({0:k}NAME),({0:ys3}NAME)[({0:k}NAME)@&&(_n_u_l_l_&_n_u_l_l_)&{0:k}NAME
0 0 1 1 1 0 0 1 1 
0 0 1 1 1 0 0 1 1 
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
0 1 1 49 17 10 0 3 
.TXT 39 0 359 0 0
Cg a72.000000,72.000000,14
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard Direct Form II}
.EQN 6 0 229 0 0
{0:wm1}NAME:0
.EQN 0 10 230 0 0
{0:wm2}NAME:0
.EQN 7 -10 176 0 0
({0:w4}NAME)[(0):{0:floor}NAME(((-{0:a1}NAME*{0:wm1}NAME-{0:a2}NAME*{0:wm2}NAME))/({0:S2}NAME)+({0:xs2}NAME)[(0))
.EQN 6 0 179 0 0
({0:ys4}NAME)[(0):{0:floor}NAME(({0:b0}NAME*({0:w4}NAME)[(0)+{0:b1}NAME*{0:wm1}NAME+{0:b2}NAME*{0:wm2}NAME)/({0:S2}NAME))
.EQN 7 0 182 0 0
({0:w4}NAME)[(1):{0:floor}NAME((-{0:a1}NAME*({0:w4}NAME)[(0)-{0:a2}NAME*{0:wm1}NAME)/({0:S2}NAME)+({0:xs2}NAME)[(1))
.EQN 6 0 183 0 0
({0:ys4}NAME)[(1):{0:floor}NAME(({0:b0}NAME*({0:w4}NAME)[(1)+{0:b1}NAME*({0:w4}NAME)[(0)+{0:b2}NAME*{0:wm1}NAME)/({0:S2}NAME))
.EQN 8 0 233 0 0
{0:k}NAME:2;{0:N}NAME
.EQN 9 0 213 0 0
({2,1}ö({0:ys4}NAME)[({0:k}NAME)ö({0:w4}NAME)[({0:k}NAME)):({2,1}ö{0:floor}NAME(({0:b0}NAME*{0:floor}NAME((-{0:a1}NAME*({0:w4}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:w4}NAME)[({0:k}NAME-2))/({0:S2}NAME)+({0:xs2}NAME)[({0:k}NAME))+{0:b1}NAME*({0:w4}NAME)[(
{0:k}NAME-1)+{0:b2}NAME*({0:w4}NAME)[({0:k}NAME-2))/({0:S2}NAME))ö{0:floor}NAME((-{0:a1}NAME*({0:w4}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:w4}NAME)[({0:k}NAME-2))/({0:S2}NAME)+({0:xs2}NAME)[({0:k}NAME)))
.TXT 11 0 330 0 0
Cg a73.000000,73.000000,27
{\rtf\ansi \deff0{\colortbl;\red0\green0\blue255;}{\fonttbl{\f0
\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard Direct Form II Modulo 32768}
.EQN 4 0 322 0 0
{0:wm1}NAME:0
.EQN 0 10 323 0 0
{0:wm2}NAME:0
.EQN 5 -10 378 0 0
({0:w5}NAME)[(0):{0:mod}NAME({0:floor}NAME(((-{0:a1}NAME*{0:wm1}NAME-{0:a2}NAME*{0:wm2}NAME))/({0:S2}NAME)+({0:xs2}NAME)[(0)),32768)
.EQN 7 0 379 0 0
({0:ys5}NAME)[(0):{0:mod}NAME({0:floor}NAME(({0:b0}NAME*({0:w5}NAME)[(0)+{0:b1}NAME*{0:wm1}NAME+{0:b2}NAME*{0:wm2}NAME)/({0:S2}NAME)),32768)
.EQN 8 0 326 0 0
({0:w5}NAME)[(1):{0:mod}NAME({0:floor}NAME((-{0:a1}NAME*({0:w5}NAME)[(0)-{0:a2}NAME*{0:wm1}NAME)/({0:S2}NAME)+({0:xs2}NAME)[(1)),32768)
.EQN 12 0 343 0 0
({0:ys5}NAME)[(1):{0:mod}NAME({0:floor}NAME(({0:b0}NAME*({0:w5}NAME)[(1)+{0:b1}NAME*({0:w5}NAME)[(0)+{0:b2}NAME*{0:wm1}NAME)/({0:S2}NAME)),32768)
.EQN 6 0 344 0 0
{0:k}NAME:2;{0:N}NAME
.EQN 10 0 349 0 0
({2,1}ö({0:ys5}NAME)[({0:k}NAME)ö({0:w5}NAME)[({0:k}NAME)):({2,1}ö{0:mod}NAME({0:floor}NAME(({0:b0}NAME*{0:mod}NAME({0:floor}NAME((-{0:a1}NAME*({0:w5}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:w5}NAME)[({0:k}NAME-2))/({0:S2}NAME)+({0:xs2}NAME)[({0:k}NAME)),32768)
+{0:b1}NAME*({0:w5}NAME)[({0:k}NAME-1)+{0:b2}NAME*({0:w5}NAME)[({0:k}NAME-2))/({0:S2}NAME)),32768)ö{0:mod}NAME({0:floor}NAME((-{0:a1}NAME*({0:w5}NAME)[({0:k}NAME-1)-{0:a2}NAME*({0:w5}NAME)[({0:k}NAME-2))/({0:S2}NAME)+({0:xs2}NAME)[({0:k}NAME)),32768))
.EQN 9 0 367 0 0
{0:k}NAME:0;{0:N}NAME
.EQN 2 0 373 0 0
&&(_n_u_l_l_&_n_u_l_l_)&({0:xs2}NAME)[({0:k}NAME),({0:ys2}NAME)[({0:k}NAME),({0:ys4}NAME)[({0:k}NAME),({0:ys5}NAME)[({0:k}NAME)@&&(_n_u_l_l_&_n_u_l_l_)&{0:k}NAME
0 0 1 1 1 0 0 1 1 
0 0 1 1 1 0 0 1 1 
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
0 1 1 49 21 10 0 3 
.EQN 31 0 371 0 0
{0:k}NAME:0;{0:N}NAME
.EQN 4 0 353 0 0
({0:y}NAME)[({0:k}NAME)=
.EQN 0 13 354 0 0
({0:ys1}NAME)[({0:k}NAME)=
.EQN 0 14 355 0 0
({0:ys2}NAME)[({0:k}NAME)=
.EQN 0 13 356 0 0
({0:ys4}NAME)[({0:k}NAME)=
.EQN 0 14 358 0 0
({0:ys5}NAME)[({0:k}NAME)=