src/equations/spiralsgs.i

c      0 spherical
c      1, 2, 3 circular direction normal.
       integer dir
       parameter (dir=0)

<