[Nek5000-users] neknek new version

[nek5000-users at lists.mcs.anl.gov]

Hi, Neks.

I use neknek script in my simulation. I write the function like set_intflag
in multimesh.f to find special bc and mark it:

      nfaces = 2*ndim
      nel    = nelfld(ifield)

      nflag=nel*nfaces
      call izero(intflag,nflag)

      do j=1,ifield
      do e=1,nel
      do f=1,nfaces
        if ( session.eq.'pipe_per1' ) then
          if ( cbc(f,e,j).eq.'P  ' ) intflag(f,e) = 1
        endif

        if ( session.eq.'pipe_per2' ) then
          if ( cbc(f,e,j).eq.'v  ' ) intflag(f,e) = 1
        endif
      enddo
      enddo
      enddo

( from periodic bc in one nek-session to inlet bc in another nek-session ).

So, it works very well on old version of nek, but on the latest version of
Nek5000 i can't interpolate boundary slice between two session in such way
anymore. And I absolutely no idea why.

Can anyone say how it can be fixed?

Regard, Vatslav
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/nek5000-users/attachments/20170926/56bc1a93/attachment.html>