Lines Matching refs:N

421       subroutine loc_grad3(ur,us,ut,u,N,D,Dt)
423 C     Input: u,N,D,Dt               Output: ur,us,ut
424       real*8 ur(0:N,0:N,0:N),us(0:N,0:N,0:N),ut(0:N,0:N,0:N)
425       real*8 u (0:N,0:N,0:N)
426       real*8 D (0:N,0:N),Dt(0:N,0:N)
428       m1 = N+1
432       do k=0,N
440       subroutine loc_grad3t(u,ur,us,ut,N,D,Dt,w)
442 C     Input: ur,us,ut,N,D,Dt        Output: u
443        real*8 u (0:N,0:N,0:N)
444        real*8 ur(0:N,0:N,0:N),us(0:N,0:N,0:N),ut(0:N,0:N,0:N)
445        real*8 D (0:N,0:N),Dt(0:N,0:N)
446        real*8 w (0:N,0:N,0:N)
448        m1 = N+1
453        do k=0,N