putnod.f.html CLAWPACK  
 Source file:   putnod.f
 Directory:   /home/rjl/git/claworg/clawpack-4.x/amrclaw/2d/lib
 Converted:   Sat Aug 6 2011 at 21:53:21   using clawcode2html
 This documentation file will not reflect any later changes in the source file. 

 
c
c -------------------------------------------------------------
c
      subroutine putnod (mptr)
c
      implicit double precision (a-h,o-z)

      include  "call.i"

c :::::::::::::::::::::::::::::: PUTNOD :::::::::::::::::::::;
c
c  return mptr node to the linked list kept in node array.
c
c ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::;
c
      node(nextfree, mptr) = ndfree
      ndfree               = mptr
c
      return
      end