Hi Paul,<br><br>This post is making me wonder if I understand how restarting works.  If I have some geometry in my .rea file, and I restart from a .fld file with different geometry, which geometry takes precedence?  I had been assuming that nek interpolated the old data onto the mesh in the .rea file.  And is the answer affected by whether or not the .fld file contains geometry data?  I think only my fld01 files contain that.<br>

<br>Best,<br><br>David<br><br><div class="gmail_quote">On Fri, Mar 11, 2011 at 9:41 AM,  <span dir="ltr"><<a href="mailto:nek5000-users@lists.mcs.anl.gov">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;">

<br>
Markus,<br>
<br>
If you're using .fld files, you can simply modify your .rea file:<br>
<br>
:<br>
:<br>
            1 PRESOLVE/RESTART OPTIONS  *****<br>
my_old.fld01  U P T time=0<br>
:<br>
:<br>
:<br>
<br>
<br>
which tells nek to take _only_ U P T and from the .fld<br>
file (assuming they are present), and to not take anything<br>
else.   Also, it tells it to reset time to 0 at the start<br>
of this calculation.   Note that if you have, say,<br>
<br>
            2 PRESOLVE/RESTART OPTIONS  *****<br>
my_old.fld01  U P T time=0<br>
my_old.fld02    P T<br>
<br>
<br>
it would take U from fld01 and P, T, and time from fld02.<br>
<br>
<br>
I don't believe we have this level of support in the .f0000<br>
format yet, but I can possibly put someone on it.<br>
<br>
In your case (assuming you're using .f0000 format), you can<br>
instead do the following in usrdat2 (by which point nek<br>
knows the geometry, but has not yet read initial conditions):<br>
<br>
<br>
c-----------------------------------------------------------------------<br>
      subroutine usrdat2<br>
      include 'SIZE'<br>
      include 'TOTAL'<br>
      parameter (ltt=lx1*ly1*lz1*lelt)<br>
      common /cmygeom/ xmo(llt),ymo(llt),zmo(llt)<br>
<br>
      call opcopy(xmo,ymo,zmo,xm1,ym1,zm1)  ! Preserve my geometry<br>
<br>
      return<br>
      end<br>
c-----------------------------------------------------------------------<br>
      subroutine usrchk<br>
      include 'SIZE'<br>
      include 'TOTAL'<br>
      parameter (ltt=lx1*ly1*lz1*lelt)<br>
      common /cmygeom/ xmo(llt),ymo(llt),zmo(llt)<br>
<br>
      call opcopy(xm1,ym1,zm1,xmo,ymo,zmo)  ! Restore my geometry<br>
<br>
      call geom_reset(1)                    ! Force regen. of Jacobians etc.<br>
<br>
      return<br>
      end<br>
c-----------------------------------------------------------------------<br>
<br>
<br>
Paul<div><div></div><div class="h5"><br>
<br>
<br></div></div></blockquote></div>