[Nek5000-users] Error when loading file

nek5000-users at lists.mcs.anl.gov nek5000-users at lists.mcs.anl.gov
Fri Oct 20 10:06:43 CDT 2017


Hi Johan,


There's also an example in navier5.f in the subroutine autoaverager().


Usage is (say):


ls -C1 case0.f* > list.in


then add this to a blank .usr file and run it


c-----------------------------------------------------------------------

      subroutine usrdat2  ! This routine to modify mesh coordinates

      include 'SIZE'

      include 'TOTAL'

      character*127 fname127


      call blank(fname127,127)


      fname127='list.in'

      call auto_averager(fname127) ! simple average of files

      call outpost(vx,vy,vz,pr,t,'   ')

      call exitti('quit after autoaverager$',nelv)


      return

      end

c-----------------------------------------------------------------------



Paul


________________________________
From: Nek5000-users <nek5000-users-bounces at lists.mcs.anl.gov> on behalf of nek5000-users at lists.mcs.anl.gov <nek5000-users at lists.mcs.anl.gov>
Sent: Friday, October 20, 2017 9:19:42 AM
To: nek5000-users at lists.mcs.anl.gov
Subject: Re: [Nek5000-users] Error when loading file

load_fld() expects a character*132 on input!

Cheers,
Stefan

-----Original message-----
> From:nek5000-users at lists.mcs.anl.gov <nek5000-users at lists.mcs.anl.gov>
> Sent: Friday 20th October 2017 16:11
> To: nek5000-users at lists.mcs.anl.gov
> Subject: [Nek5000-users] Error when loading file
>
> Hi,
>
> I load a file in userchk for postprocessing like this:
>
>       subroutine userchk
>       include 'SIZE'
>       include 'TOTAL'
>       character(64)::filen
>       filen="cha0.f00027"
>
>       call load_fld(trim(filen))
>
>       return
>       end
>
> However, I the program crashes. This is how it looks in the logfile:
>
>  nsteps=0 -> skip time loop
>  running solver in post processing mode
>
>  call userchk
>
>  set initial conditions
>  Checking restart options: cha0.f000274^@^@^@^@start
>  nekuic (1) for ifld            1
>  nekuic (1) for ifld            2
>  nekuic (1) for ifld            3
>  nekuic (1) for ifld            4
>  Reading checkpoint data
>        0       0 OPEN: cha0.f000274^@^@^@^@start
> cha0.f000274
> byte_read() :: fopen failure2!
> ERROR: Error reading restart header in mfi_prepare  ierr=  1
>
> Why does this error appear, and how can Ifix it?
>
> Best,
>
> Johan
>
>
>
>
> _______________________________________________
> Nek5000-users mailing list
> Nek5000-users at lists.mcs.anl.gov
> https://lists.mcs.anl.gov/mailman/listinfo/nek5000-users
_______________________________________________
Nek5000-users mailing list
Nek5000-users at lists.mcs.anl.gov
https://lists.mcs.anl.gov/mailman/listinfo/nek5000-users
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/nek5000-users/attachments/20171020/4c0c21eb/attachment.html>


More information about the Nek5000-users mailing list