Algorithm for computing the moduli space of pointed Gorenstein curves with Weierstrass gap sequence \(1,2,\ldots,g-2,\lambda,2g-3\) A birational contraction of genus 2 tails in the moduli space of genus 4 curves I 