trabalho 3

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

PK���������O2MñB–H������������mimetypetext/x-wxmathmlPK���������O2M£�$�®���®���
���format.txt
This file contains a wxMaxima session.
.wxmx files are .xml-based files contained in a .zip container like .odt
or .docx files. After changing their name to end in .zip the .xml and
other files inside them can can be extracted using any .zip file viewer.
The reason why part of a .wxmx file still might seem to make sense in a
ordinary text viewer is that the text portion of .wxmx by default
isn't compressed: This way if only one line of the text changes this won't
(with a high probability) change the value of half of the bytes of the
.zip archive making the .wxmx file more version-control-friendly.
wxMaxima can be downloaded from https://github.com/andrejv/wxmaxima.
PK���������O2MH�=¼y���y�������content.xml<?xml version="1.0" encoding="UTF-8"?>
<!-- Created by wxMaxima 16.04.2 -->
<!--http://wxmaxima.sourceforge.net-->
<wxMaximaDocument version="1.4" zoom="100" activecell="0">
<cell type="code">
<input>
<editor type="input">
<line>M1 = 117;</line>
<line>M2 = 11;</line>
<line>M3 = 10;</line>
<line>M4 = 005;</line>
</editor>
</input>
<output>
<mth><lbl>(%o1) </lbl><v>M1</v><v>=</v><n>117</n><lbl>(%o2) </lbl><v>M2</v><v>=</v><n>11</n><lbl>(%o3) </lbl><v>M3</v><v>=</v><n>10</n><lbl>(%o4) </lbl><v>M4</v><v>=</v><n>4</n>
</mth></output>
</cell>
<cell type="code">
<input>
<editor type="input">
<line>x : [mod(M1,13), M3*(−1)*M4, M2]; n : length(x);</line>
<line>h : [M2, M4, M3]; m : length(h);</line>
<line>y : makelist(sum((if j &gt; n then 0 else x[j])*</line>
<line>(if k-j+1 &lt; 1 or k-j+1 &gt; m</line>
<line>then 0 else h[k-j+1]),j,1,k),k,1,m+n-1 );</line>
<line>display(y);</line>
</editor>
</input>
<output>
<mth><lbl>(%o5) </lbl><t>[</t><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><t>,</t><v>−</v><v>M3</v><h>*</h><v>M4</v><t>,</t><v>M2</v><t>]</t><lbl>(%o6) </lbl><n>3</n><lbl>(%o7) </lbl><t>[</t><v>M2</v><t>,</t><v>M4</v><t>,</t><v>M3</v><t>]</t><lbl>(%o8) </lbl><n>3</n><lbl>(%o9) </lbl><t>[</t><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><h>*</h><v>M2</v><t>,</t><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><h>*</h><v>M4</v><v>−</v><v>M2</v><h>*</h><v>M3</v><h>*</h><v>M4</v><t>,</t><v>−</v><v>M3</v><h>*</h><e><r><v>M4</v></r><r><n>2</n></r></e><v>+</v><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><h>*</h><v>M3</v><v>+</v><e><r><v>M2</v></r><r><n>2</n></r></e><t>,</t><v>M2</v><h>*</h><v>M4</v><v>−</v><e><r><v>M3</v></r><r><n>2</n></r></e><h>*</h><v>M4</v><t>,</t><v>M2</v><h>*</h><v>M3</v><t>]</t><v>y</v><v>=</v><t>[</t><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><h>*</h><v>M2</v><t>,</t><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><h>*</h><v>M4</v><v>−</v><v>M2</v><h>*</h><v>M3</v><h>*</h><v>M4</v><t>,</t><v>−</v><v>M3</v><h>*</h><e><r><v>M4</v></r><r><n>2</n></r></e><v>+</v><fn><fnm>mod</fnm><p><v>M1</v><t>,</t><n>13</n></p></fn><h>*</h><v>M3</v><v>+</v><e><r><v>M2</v></r><r><n>2</n></r></e><t>,</t><v>M2</v><h>*</h><v>M4</v><v>−</v><e><r><v>M3</v></r><r><n>2</n></r></e><h>*</h><v>M4</v><t>,</t><v>M2</v><h>*</h><v>M3</v><t>]</t><lbl>(%o10) </lbl><v>done</v>
</mth></output>
</cell>
<cell type="code">
<input>
<editor type="input">
<line>h(t) := M4*t*exp((−1)*M1*t);</line>
<line>x(t) := M2*exp((−1)*M1*t)*cos(2*%pi*M1*t)*unit_step(t);</line>
<line>conv(u,v,t) := ilt(laplace(u,t,s) * laplace(v,t,s), s, t);</line>
<line>display(conv(h(t),x(t),t));</line>
</editor>
</input>
<output>
<mth><lbl>(%o11) </lbl><fn><fnm>h</fnm><p><v>t</v></p></fn><t>:=</t><v>M4</v><h>*</h><v>t</v><h>*</h><fn><fnm>exp</fnm><p><v>−</v><n>1</n><h>*</h><v>M1</v><h>*</h><v>t</v></p></fn><lbl>(%o12) </lbl><fn><fnm>x</fnm><p><v>t</v></p></fn><t>:=</t><v>M2</v><h>*</h><fn><fnm>exp</fnm><p><v>−</v><n>1</n><h>*</h><v>M1</v><h>*</h><v>t</v></p></fn><h>*</h><fn><fnm>cos</fnm><p><n>2</n><h>*</h><s>%pi</s><h>*</h><v>M1</v><h>*</h><v>t</v></p></fn><h>*</h><fn><fnm>unit_step</fnm><p><v>t</v></p></fn><lbl>(%o13) </lbl><fn><fnm>conv</fnm><p><v>u</v><t>,</t><v>v</v><t>,</t><v>t</v></p></fn><t>:=</t><fn><fnm>ilt</fnm><p><fn><fnm>laplace</fnm><p><v>u</v><t>,</t><v>t</v><t>,</t><v>s</v></p></fn><h>*</h><fn><fnm>laplace</fnm><p><v>v</v><t>,</t><v>t</v><t>,</t><v>s</v></p></fn><t>,</t><v>s</v><t>,</t><v>t</v></p></fn><st>Is </st><v>M1</v><st> zero or nonzero?</st><editor type="input">
<line></line>
</editor>
<t type="error">incorrect syntax: : is not a prefix operator</t><t>:l</t><t>^</t>
</mth></output>
</cell>
<cell type="code">
<input>
<editor type="input">
<line>x(t) := M2*exp(−M1*t)*cos(2*%pi*M1*t)*unit_step(t);</line>
<line>h(t) := M4*t*exp(−M1*t);</line>
<line>conv(u,v,t) := ilt(laplace(u,t,s)*laplace(v,t,s), s, t);</line>
<line>plot2d([conv(x(t),h(t),t),x(t),h(t)],[t,0,10],[legend,&quot;x(t)*h(t)&quot;,&quot;x(t)&quot;,&quot;h(t)&quot;]);</line>
</editor>
</input>
<output>
<mth><t breakline="true" type="error">Maxima encountered a Lisp error: </t><t breakline="true">EVAL: undefined function WX-CD </t><t breakline="true">Automatically continuing. </t><t breakline="true">To enable the Lisp debugger set *debugger-hook* to nil. </t>
</mth></output>
</cell>
</wxMaximaDocument>PK�����������O2MñB–H��������������������������mimetypePK�����������O2M£�$�®���®���
�������������5���format.txtPK�����������O2MH�=¼y���y���������������������content.xmlPK����������§���­�����