add writing procedure clken