var1 i,j,k; ((j>k => i=0) & (j<=k => ((j+1<k => i=j+1) & (j+1=k => i=0) & ((j=k & k>1) => i=1) & ((j=k & k<=1) => i=0)))) <=> i=j+1%k;
var1 i,j,k; ((j>k => i=0) & (j<=k => ((j+1<k => i=j+1) & (j+1=k => i=0) & ((j=k & k>1) => i=1) & ((j=k & k<=1) => i=0)))) <=> i=j+1%k;