在镜头设计的过程中，有时需要在保持光焦度不变的情况下手动修改某个镜片的材料。我们可以借助以下宏完成相应的工作。
20181209 v1.0 首次发布
1.替换材料,并根据公式rNew =rOld*(nNew-1)/(nOld-1)更新曲率半径的数据。
2.只能输入正在使用的玻璃库里的材料。
3.由于ZEMAX的内部机制，输入的材料名称对大小写敏感。

另：光行天下是我成长的地方，所以共享资料在这里一并首发。

更新历史：
20181215 v1.2
1.调整单面光角度及曲率半径的更新策略，修正了当原曲率半径=Infinity时的不适应情况