static struct sezanm *sodilihi(*p)
struct seznam *p;
{
    struct seznam **q = &p, *lihi=NULL, *t;
    while (*q!=NULL)
        if ((*q)->x % 2 == 0) 
	       q =&(*q)->nasl; /*premaknemo se naprej*/
        else { 
            t=*q; /* pokaz. na lih.*/ 
            *q=t->nasl;/*l.st. izlocimo*/
            t->nasl=lihi; /*dod.  na zac. sez.*/
            lihi=t;
        } /*else*/
    *q=lihi; /*zdruzimo sode in lihe*/
    return p;
}