[comment testing
martin.hofmann@uni-bamberg.de**20081113100820] hunk ./src/Advancement.hs 11
-partition :: Rule -> IM [(Rule,FunFragment)]
+--partition :: Rule -> IM [(Rule,FunFragment)]
+-- more to be done