#445 segfault on mistral with uu_momentum_3d

[Carsten Lemmen]

When running gf/npzd in sns setup on mistral, I get a segfault in uu_momentum_3d:

gf                 0000000000B19C8C  uu_momentum_3d_           246  uu_momentum_3d.F90
gf                 000000000091A01E  momentum_3d_               68  momentum_3d.F90
gf                 00000000008E8BED  m3d_mp_integrate_         669  m3d.F90

The respective code is:

              do k=kumin(i,j)+1,kmax-1
                  a3(k)=-auxn(k  )/hun(i,j,k+1)
                  a1(k)=-auxn(k-1)/hun(i,j,k-1)
                  a2(k)=_ONE_+(auxn(k)+auxn(k-1))/hun(i,j,k)
                  a4(k)=uuEuler(i,j,k+1)*auxo(k)/huo(i,j,k+1)               &
                       +uuEuler(i,j,k  )*(1-(auxo(k)+auxo(k-1))/huo(i,j,k)) &
    246:     +uuEuler(i,j,k-1)*auxo(k-1)/huo(i,j,k-1)             &
                       +dt*ex(k)                                            &
                       -dt*_HALF_*(huo(i,j,k)+hun(i,j,k))*g*zx
               end do

[Knut]

is there a more specific error message?

On 04/26/2017 03:19 PM, Carsten Lemmen wrote:

---

[tickets:#445] https://sourceforge.net/p/mossco/tickets/445/
segfault on mistral with uu_momentum_3d

Status: open
Milestone: 15 Package
Labels: getm segfault momentum
Created: Wed Apr 26, 2017 01:19 PM UTC by Carsten Lemmen
Last Updated: Wed Apr 26, 2017 01:19 PM UTC
Owner: Knut

When running gf/npzd in sns setup on mistral, I get a segfault in
uu_momentum_3d:

gf 0000000000B19C8C uu_momentum_3d_ 246 uu_momentum_3d.F90
gf 000000000091A01E momentum_3d_ 68 momentum_3d.F90
gf 00000000008E8BED m3d_mp_integrate_ 669 m3d.F90

The respective code is:

           do k=kumin(i,j)+1,kmax-1
               a3(k)=-auxn(k  )/hun(i,j,k+1)
               a1(k)=-auxn(k-1)/hun(i,j,k-1)
               a2(k)=_ONE_+(auxn(k)+auxn(k-1))/hun(i,j,k)
               a4(k)=uuEuler(i,j,k+1)*auxo(k)/huo(i,j,k+1)               &
                    +uuEuler(i,j,k  )*(1-(auxo(k)+auxo(k-1))/huo(i,j,k)) &
 246:     +uuEuler(i,j,k-1)*auxo(k-1)/huo(i,j,k-1)             &
                    +dt*ex(k)                                            &
                    -dt*_HALF_*(huo(i,j,k)+hun(i,j,k))*g*zx
            end do

---

Sent from sourceforge.net because you indicated interest in
https://sourceforge.net/p/mossco/tickets/445/

To unsubscribe from further messages, please visit
https://sourceforge.net/auth/subscriptions/

[Carsten Lemmen]

No further information in stderr or stdout or PET*; stderr attached