[Nek5000-users] Regarding Post-Processing
nek5000-users at lists.mcs.anl.gov
nek5000-users at lists.mcs.anl.gov
Tue Jun 30 10:16:25 CDT 2015
Hi Kamal,
When you create your file.list, the first line needs to be the number of
files you're going to read, and the following lines the file names. For
example :
5
file.f00001
file.f00002
file.f00003
file.f00004
file.f00005
Regards,
Holly
Holly JOHNSON
PhD Student ONERA - DAFE
Département d'Aérodynamique Fondamentale et Expérimentale
8, Rue des Vertugadins
92190 - Meudon - France
Le 30/06/2015 17:08, nek5000-users at lists.mcs.anl.gov a écrit :
> Hi Neks,
>
> I would like to post process the 0.f00* files. I set my Nsteps = 0 to
> run in post processing mode.
> and used the below code. Can someone tell me how to create the
> 'file.list' file ?
>
> I tried creating a file.list, something like this:
>
> ca0.f00001
> ca0.f00002
> ca0.f00003
> . .
> . .
> . .
>
>
> but still I get error "Bad integer for item 1 in list input "
>
> subroutine userchk
> include 'SIZE'
> include 'TOTAL'
> include 'RESTART'
> logical if_drag_out,if_torq_out
>
>
> character*80 filename(9999)
> parameter (lt=lx1*ly1*lz1*lelt)
> real l2(lx1,ly1,lz1,nelt)
> integer nfiles
>
> ntot = nx1*ny1*nz1*nelv
>
> ifreguo = .true.
>
> if (nid.eq.0) then
> open(unit=199,file='file.list',form='formatted',status='old')
> read(199,*) nfiles
> read(199,'(A80)') (filename(i),i=1,nfiles)
> close(199)
> endif
>
> call bcast(nfiles,isize)
> call bcast(filename,nfiles*80)
>
> do i = 1,nfiles
> call load_fld(filename(i))
> call lambda2(L2)
> ifto = .true.
> call outpost(vx,vy,vz,pr,l2,'his')
> enddo
>
> call exitt
>
>
> Thanks,
> Kamal
> _______________________________________________
> Nek5000-users mailing list
> Nek5000-users at lists.mcs.anl.gov
> https://lists.mcs.anl.gov/mailman/listinfo/nek5000-users
More information about the Nek5000-users
mailing list