[提问]关于程序包和替换

现在我有一自定义函数是这样的:
VectorsOfOnePoint[f_,g_,m_]:=(Module[{s1,s2,s3,r1,r2,x0,y0,z0,s},
s1[s_]:=ReplaceAll[f,{x->x0[s],y->y0[s],z->z0[s]}];
s2[s_]:=ReplaceAll[g,{x->x0[s],y->y0[s],z->z0[s]}];
Print[s1[s]];
Print[s2[s]];
......(注释掉无关部分)
])
当我把这段程序放在程序包中载入时,输入
VectorsOfOnePoint[x^2 + y^2 == 1, y + z == 0, {0, -1, 0}]
结果出来的是这个

但我实际上想要把x,y,z替换成x0[s],y0[s],z0[s],很明显这个程序并没有这样做.
但当我把它单独拉出来在笔记本里面重新定义再运行一遍时,它就是正确的我想要的结果

所以我应该如何修改程序包里面的程序?