function no, eins, &zweivar {
    zweivar = eins*eins*eins
    return eins*eins
}

// this procedure doesn't compile because the second
// argument to no() is an expression !
procedure testno, &res, &aa {
    a = 2
    res = no(a, 2+2)
    aa = a
}

