:: deftheorem Def1 defines Cart4Id NUMBER17:def 1 :
for b1 being Function of NATPLUS,[:NATPLUS,NATPLUS,NATPLUS,NATPLUS:] holds
( b1 = Cart4Id iff for n being positive Nat holds b1 . n = [n,n,n,n] );