4) :: x(n), y(n), xi(m), yi(m)</div>
<div class="line">    <span class="keywordtype">type</span>(plot_2d) :: plt</div>
<div class="line">    <span class="keywordtype">type</span>(plot_data_2d) :: d1, d2</div>
<div class="line"> </div>
<div class="line">    <span class="comment">! Initialization</span></div>
<div class="line">    x = [-4.0d0, -3.0d0, -2.0d0, -1.0d0, 0.0d0, 1.0d0, 2.0d0, 3.0d0, 4.0d0]</div>
<div class="line">    y = [0.0d0, 0.15d0, 1.12d0, 2.36d0, 2.36d0, 1.46d0, 0.49d0, 0.06d0, &amp;</div>
<