 <span class="keyword">allocate</span>(flm_syn(0:L**2-1), stat=fail)  
<a name="l00105"></a>00105   <span class="keyword">allocate</span>(f_dh(0:2*L-1, 0:2*L-2), stat=fail)
<a name="l00106"></a>00106   <span class="keyword">allocate</span>(f_gl(0:L-1, 0:2*L-2), stat=fail)
<a name="l00107"></a>00107   <span class="keyword">allocate</span>(f_mweo(0:L-2, 0:2*L-2), stat=fail)
<a name="l00108"></a>00108   <span class="keyword">allocate</span>(f_mw(0:L-2, 0:2*L-2), stat=fail)
<a name="l00109"></a>00109   <span cl