--- trunk/OOPSE-4/src/UseTheForce/fForceOptions.h 2005/12/07 19:44:26 2495 +++ trunk/OOPSE-4/src/UseTheForce/fForceOptions.h 2005/12/07 19:46:56 2496 @@ -21,7 +21,7 @@ typedef struct{ INTEGER, PARAMETER:: GEOMETRIC_MIXING_RULE = 1 INTEGER, PARAMETER:: ARITHMETIC_MIXING_RULE = 2 - type,public :: ForceOptions + type :: ForceOptions SEQUENCE integer :: DistanceMixingRule integer :: EnergyMixingRule