diff --git a/contrib/marat/amber-helper/amber_params.fh b/contrib/marat/amber-helper/amber_params.fh
index 4140865b16..1ed54374c8 100644
--- a/contrib/marat/amber-helper/amber_params.fh
+++ b/contrib/marat/amber-helper/amber_params.fh
@@ -15,3 +15,4 @@
 
       double precision ang_to_nm
       parameter(ang_to_nm=0.1d0)
+c $Id$
diff --git a/contrib/marat/amber-helper/main.F b/contrib/marat/amber-helper/main.F
index e35621590b..b20edbf7b3 100644
--- a/contrib/marat/amber-helper/main.F
+++ b/contrib/marat/amber-helper/main.F
@@ -494,3 +494,4 @@ c
       return
       end subroutine
 
+c $Id$
diff --git a/contrib/marat/pdb-utils/main.f b/contrib/marat/pdb-utils/main.f
index 71c466c5dd..34a77ec2f6 100644
--- a/contrib/marat/pdb-utils/main.f
+++ b/contrib/marat/pdb-utils/main.f
@@ -81,3 +81,4 @@ c
        end
 
 
+c $Id$
diff --git a/contrib/marat/pdb-utils/smd_pdb.F b/contrib/marat/pdb-utils/smd_pdb.F
index 32236c9893..8cd34a9545 100644
--- a/contrib/marat/pdb-utils/smd_pdb.F
+++ b/contrib/marat/pdb-utils/smd_pdb.F
@@ -496,3 +496,4 @@ c
 20    length = i 
       end 
 
+c $Id$
diff --git a/contrib/marat/rdf-new/main.f b/contrib/marat/rdf-new/main.f
index b8b17f36bb..ece7420660 100644
--- a/contrib/marat/rdf-new/main.f
+++ b/contrib/marat/rdf-new/main.f
@@ -963,3 +963,4 @@ c      if you reach this you are in trouble
 
       end subroutine
 
+c $Id$
diff --git a/contrib/marat/rdf/main.f b/contrib/marat/rdf/main.f
index 89be436cf7..b6332a1b0d 100644
--- a/contrib/marat/rdf/main.f
+++ b/contrib/marat/rdf/main.f
@@ -334,3 +334,4 @@ c
       return
 
       end
+c $Id$
diff --git a/contrib/marat/spectrum-improved/main.f b/contrib/marat/spectrum-improved/main.f
index 0e8062ece3..c96e97e9fd 100644
--- a/contrib/marat/spectrum-improved/main.f
+++ b/contrib/marat/spectrum-improved/main.f
@@ -113,3 +113,4 @@ c
        end
 
 
+c $Id$
diff --git a/contrib/marat/swap/main.f b/contrib/marat/swap/main.f
index 84baa69488..11598a997c 100644
--- a/contrib/marat/swap/main.f
+++ b/contrib/marat/swap/main.f
@@ -96,3 +96,4 @@ c
        end
 
 
+c $Id$
diff --git a/contrib/marat/swap/smd_pdb.F b/contrib/marat/swap/smd_pdb.F
index 3fdf7f4933..8baf7cee85 100644
--- a/contrib/marat/swap/smd_pdb.F
+++ b/contrib/marat/swap/smd_pdb.F
@@ -497,3 +497,4 @@ c
 20    length = i 
       end 
 
+c $Id$
diff --git a/contrib/marat/trajectory-conversion/main.F b/contrib/marat/trajectory-conversion/main.F
index eb973b3aed..eb2656600a 100644
--- a/contrib/marat/trajectory-conversion/main.F
+++ b/contrib/marat/trajectory-conversion/main.F
@@ -520,3 +520,4 @@ c
       i0=i+1
       ostatus = k.gt.0
       end subroutine
+c $Id$
diff --git a/contrib/pseudopotentials/troullier-martins/atm.f b/contrib/pseudopotentials/troullier-martins/atm.f
index f42a8c2fdd..e4e9ac56ec 100644
--- a/contrib/pseudopotentials/troullier-martins/atm.f
+++ b/contrib/pseudopotentials/troullier-martins/atm.f
@@ -10694,3 +10694,4 @@ c
 C
 C
 C
+c $Id$
diff --git a/contrib/pseudopotentials/troullier-martins/kbconv.f b/contrib/pseudopotentials/troullier-martins/kbconv.f
index 0db0ee447a..398e5e0283 100644
--- a/contrib/pseudopotentials/troullier-martins/kbconv.f
+++ b/contrib/pseudopotentials/troullier-martins/kbconv.f
@@ -2306,3 +2306,4 @@ C     CALL LINK("UNIT12=(kbly.o,create,text)//")
       CLOSE(unit=12)
       RETURN
       END
+c $Id$
diff --git a/contrib/pseudopotentials/troullier-martins/plotplot.c b/contrib/pseudopotentials/troullier-martins/plotplot.c
index 05b8add641..a8de1fcf8c 100644
--- a/contrib/pseudopotentials/troullier-martins/plotplot.c
+++ b/contrib/pseudopotentials/troullier-martins/plotplot.c
@@ -52,3 +52,4 @@ main()
 	    }
 	}
 }
+/* $Id$ */
diff --git a/contrib/pseudopotentials/troullier-martins/splift.f b/contrib/pseudopotentials/troullier-martins/splift.f
index d3036e57ef..3daac87799 100644
--- a/contrib/pseudopotentials/troullier-martins/splift.f
+++ b/contrib/pseudopotentials/troullier-martins/splift.f
@@ -339,3 +339,4 @@ C
        GO TO 10
 C
        END
+c $Id$
diff --git a/contrib/pseudopotentials/troullier-martins/tridib.f b/contrib/pseudopotentials/troullier-martins/tridib.f
index 3790e12c3d..ad4e61c539 100644
--- a/contrib/pseudopotentials/troullier-martins/tridib.f
+++ b/contrib/pseudopotentials/troullier-martins/tridib.f
@@ -280,3 +280,4 @@ C                EXACTLY THE DESIRED EIGENVALUES **********
       RETURN
 C     ********** LAST CARD OF TRIDIB **********
       END
+c $Id$
diff --git a/contrib/socrates/socrates_util.F b/contrib/socrates/socrates_util.F
index 15d6f7ef38..7694e2bc70 100644
--- a/contrib/socrates/socrates_util.F
+++ b/contrib/socrates/socrates_util.F
@@ -77,3 +77,4 @@ c
       call util_flush(LuOut)
       end
 
+c $Id$