<div dir="ltr"><div><div><div><div>Hi Ilias,<br><br></div>For the file.list, you could modify the script below, in order to circumvent, writing too mainy files in the "file.list"<br><br>*--------------------------------------------------------------------------------*<br> program lst1<br> implicit none <br><br> integer, parameter :: N = 140<br> character*80,dimension(N) :: filename<br> integer :: i,j,k<br><br> <br> open(unit = 10,file='file.list',action='write')<br> write(10,"(I3)") N <br> do i = 1,N<br> <br> if(i .lt. 100)then<br> write(filename(i),'(A,I5.5)') 'turbChannel0.f',i<br> else<br> write(filename(i),'(A,I5.5)') 'turbChannel0.f',i<br> endif<br> enddo<br><br> do i = 1,N<br> write(10,*) trim(filename(i))<br> enddo<br><br><br> close(10)<br> stop<br> end program lst1<br>*--------------------------------------------------------------------------------*<br></div><br></div>For various post-processing format I use this script to write multiple files in file-list.<br><br><br></div><div> I was previously using ifreguo = .true. in post-processing format of nek for uniform interpolation. But, how are you performing FFT after interpolating to uniform mesh. Are you using a library, could you elucidate/ describe a little more on the process, on how you do that? I was trying to do that as well.<br><br></div><div>Sincerely,<br>Tanmoy<br></div></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature"><div dir="ltr"><div>Best Regards,<br></div>Tanmoy<br></div></div></div>
<br><div class="gmail_quote">On Sat, Jan 24, 2015 at 11:08 AM, <span dir="ltr"><<a href="mailto:nek5000-users@lists.mcs.anl.gov" target="_blank">nek5000-users@lists.mcs.anl.gov</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div><br></div><div>For time-space Fourier analysis I need data on a uniform mesh.</div><div>So I have used int_tp.</div><div><br></div><div>When I applied int_tp to binary *0.f* files (param(66) = 6) I have got a strange pictures which reflect the solution, but as if some elements were switched before interpolation.</div><div><br></div><div>So I tried to make uniform interpolation to the most simple tutorial examples, namely Rayleigh-Bendard ray_nn case.</div><div><br></div><div>Again if I apply int_tp to binary *0.f* of *fld*, then the result is as if the some space patches where switched,</div><div>but if int_tp is applied ot ASCII fld files (param(66) = 6) then int_tp works and saves the result correctly to both text and binary format.</div><div><br></div><div>Is it a common problem, or I miss something? (input files in text format work for me but occupie too much space.)</div><div><br></div><div>Also, for each file in file.list int_tp asks for input file format.</div><div>But to make time-space analysis I need more that 1000 files in file.list, and</div><div>it is tiresome to type an answer that number of times.</div><div>It could be better to choose input file format just once at the beginning?</div><div><br></div><div>Thank you in advance, Ilias</div><div><br></div><div><br></div></div>
<br>_______________________________________________<br>
Nek5000-users mailing list<br>
<a href="mailto:Nek5000-users@lists.mcs.anl.gov">Nek5000-users@lists.mcs.anl.gov</a><br>
<a href="https://lists.mcs.anl.gov/mailman/listinfo/nek5000-users" target="_blank">https://lists.mcs.anl.gov/mailman/listinfo/nek5000-users</a><br>
<br></blockquote></div><br></div>