theorem Th43: :: VALUED_1:44
for i being Nat
for k being Element of NAT
for p being FinSequence st k in dom p holds
(Sgm (dom (Shift (p,i)))) . k = i + k