Merge pull request #21 from swails/master

Add back the help flag to sqm.
choderalab · Jul 8, 2015 · ead4384 · ead4384
2 parents fd69b5d + 633ac44
commit ead4384
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/sqm/sqm.F90 b/sqm/sqm.F90
@@ -86,6 +86,13 @@ program sqm
          call getarg(iarg,mdout)
       else if (arg == '-O') then
          owrite = 'R'   ! output status: Replace
+      else if (arg == '-h') then
+         write(6,'(a)') 'sqm [-O] -i <input> -o <output>'
+         write(6,'(a)') '   -O           Overwrite output file if it exists'
+         write(6,'(a)') '   -i <input>   Input file'
+         write(6,'(a)') '   -o <output>  Output file'
+         write(6,'(a)') '   -h           Show this message'
+         call mexit(6, 0)
       else if (arg == ' ') then
          continue
       else