% source condition
function [Sxsta,Sxend,Systa,Syend,Szsta,Szend]=Source(Sxsta,Sxend,Systa,Syend,Szsta,Szend)
Sxsta=Sxsta;Sxend=Sxend;
Systa=Systa;Syend=Syend;
Szsta=Szsta;Szend=Szend;