<div dir="ltr">Hi all,<div><br><div><div>The following Fourier Transformation Function gives me constant 0 value. Is there anyone who can guide me to solve this issue? </div><div><br></div>undef ("fftwavenumber") Â  Â  Â <br>function fftwavenumber (in[*]:numeric) Â  Â  Â  Â  Â <br><br>local in,p,a,b,f,output<span class="gmail-im" style="color:rgb(80,0,80)"><br><br>begin<br>  Â  N=dimsizes(in)<br><br>  Â if mod(N,2).eq.0 then<br>  Â  Â  Â  Â p=N/2 Â  Â  ; N even<br>  Â else<br>  Â  Â  Â  Â p=(N-1)/2 ; N odd<br>  Â end if<br><br>pi=3.1416<br><br>a = new((/ p /), typeof(in),getVarFillValue(in))<br>b = new((/ p /), typeof(in),getVarFillValue(in))<br><br>do k=0,p-1<br></span>  do t=0,N-1<br>  Â  Â  a(k) = (2/N)*( in(t)*cos(2*pi*k*t/N) )<br>  Â  Â  b(k) = (2/N)*( in(t)*sin(2*pi*k*t/N) )<span class="gmail-im" style="color:rgb(80,0,80)"><br>  end do<br>end do<br><br>f = new((/ k,t /), typeof(in),getVarFillValue(in))<br>output = new((/ t /), typeof(in),getVarFillValue(in))<br><br>do t=0,N-1<br>  Â do k=0,p-1<br>  Â  Â  Â  f(k,t) = a(k)*cos(2*pi*k*t/N)+ b(k)*sin(2*pi*k*t/N)<br>  Â end do<br></span>  Â output(t)=(sum(f(0,t))) Â ; 0 used for Fourier Decomposition (wave number 1)<br>  Â return(output)<br>end do<br>end   <br></div><div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><font color="#000000" size="2"><b>Md. Jalal Uddin</b></font></div><div dir="ltr">MSc in Applied Meteorology<br>Nanjing University of Information, Science and Technology, China</div><div dir="ltr"><span style="letter-spacing:0.2px">B.Sc. in Disaster Management (Hons.) </span><br></div><div dir="ltr"><span style="letter-spacing:0.2px">Patuakhali Science and Technology University, Bangladesh.</span></div><div dir="ltr">Cell: +8613260859092, <span style="letter-spacing:0.2px">+8801792052662</span></div><div dir="ltr"><font size="2">Web: <a href="http://www.dmjalal90.weebly.com" target="_blank">www.dmjalal90.weebly.com</a> Â <br>Facebook: jalal.hossen.39 Â <br>LinkedIn: <a href="https://bd.linkedin.com/in/md-jalal-uddin-80a026b0" target="_blank">https://bd.linkedin.com/in/md-jalal-uddin-80a026b0</a> Â  </font><br></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div>