/**************************/
/*      Half adder        */
/**************************/
module hadder {
    input a, b ;
    output s, c ;
    instrin enable ;
    instruct enable par {
        s = (a & ^b)|(^a & b) ;
        c =  a & b  ;
    }
}