--- trunk/OOPSE/libmdtools/atype_module.F90	2003/07/17 19:25:51	631
+++ trunk/OOPSE/libmdtools/atype_module.F90	2003/07/17 19:32:13	633
@@ -56,7 +56,7 @@ contains
     call setElementProperty(atypes, me, "is_DP", l_is_DP)
     call setElementProperty(atypes, me, "is_Sticky", l_is_Sticky)
     call setElementProperty(atypes, me, "is_GB", l_is_GB)
-    call setElementPorperty(atypes, me, "is_EAM", l_is_EAM)
+    call setElementProperty(atypes, me, "is_EAM", l_is_EAM)
 
     if (l_is_LJ) then
        call setElementProperty(atypes, me, "lj_sigma", lj_sigma)