int index(S,T,pos){
if(pos>0){
n=strlength(S);m=strlength(T);i=pos;
while(i<=n-m+1);
substring(sub,S,i,m);
if(strcompare(sub,T)!=0) ++i
else return i;
}
}
if(pos>0){
n=strlength(S);m=strlength(T);i=pos;
while(i<=n-m+1);
substring(sub,S,i,m);
if(strcompare(sub,T)!=0) ++i
else return i;
}
}