From 65bdb0b06cf6c396f6a3daf9fef9e27b1197ca4d Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Tue, 18 Jun 2013 19:50:50 -0400
Subject: [PATCH 1/3] Update settings.xml RELAX NG schema for <track>.

---
 src/templates/settings.rnc | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/templates/settings.rnc b/src/templates/settings.rnc
index 47dd690bc..f5f723b8d 100644
--- a/src/templates/settings.rnc
+++ b/src/templates/settings.rnc
@@ -99,6 +99,8 @@ element settings {
 
   element trace { list { xsd:positiveInteger+ } }? &
 
+  element track { list { xsd:positiveInteger+ } }? &
+
   element verbosity { xsd:positiveInteger }? &
 
   element uniform_fs{

From 51a1bc028b88d1b0886e1a53173789f0453ccac3 Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Tue, 18 Jun 2013 19:52:55 -0400
Subject: [PATCH 2/3] Update man page with -k, --track.

---
 man/man1/openmc.1 | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/man/man1/openmc.1 b/man/man1/openmc.1
index eb8981f38..d07653d2a 100644
--- a/man/man1/openmc.1
+++ b/man/man1/openmc.1
@@ -24,6 +24,9 @@ Run in plotting mode
 Restart a previous run from a state point or a particle restart file named
 \fIbinaryFile\fP.
 .TP
+.B "\-k\fR, \fP\-\-track"
+Write tracks for all particles.
+.TP
 .B "\-v\fR, \fP\-\-version"
 Show version information.
 .TP

From 3a0fdefacb19c27cb41aa1526e3d0231cb2892a4 Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Tue, 18 Jun 2013 19:56:32 -0400
Subject: [PATCH 3/3] Minor fixes.

---
 src/output.F90 | 2 +-
 src/source.F90 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/output.F90 b/src/output.F90
index 77b323ce6..76c48ec21 100644
--- a/src/output.F90
+++ b/src/output.F90
@@ -170,7 +170,7 @@ contains
       write(OUTPUT_UNIT,*) '  -r, --restart          Restart a previous run from a state point'
       write(OUTPUT_UNIT,*) '                         or a particle restart file'
       write(OUTPUT_UNIT,*) '  -t, --tallies          Write tally results from state point'
-      write(OUTPUT_UNIT,*) '  -k, --tracks           Write tracks for all particles'
+      write(OUTPUT_UNIT,*) '  -k, --track            Write tracks for all particles'
       write(OUTPUT_UNIT,*) '  -v, --version          Show version information'
       write(OUTPUT_UNIT,*) '  -?, --help             Show this message'
     end if
diff --git a/src/source.F90 b/src/source.F90
index 02e1c3b99..3e7443703 100644
--- a/src/source.F90
+++ b/src/source.F90
@@ -187,7 +187,7 @@ contains
              &p % id == track_identifiers(3,i)) then
           write_track = .true.
           exit
-         end if
+        end if
       end do
     end if