function Chainer (X : String) return String is
begin
    return X;
end Chainer;

function DeChainer (X : String) return String is
begin
    return X;
end DeChainer;