function asm_clean(uint s, uint i)
    {

        assembly{
            let seed := calldataload(4)
            let iterations := calldataload(36)
            let target :=seed
        
        loop:
            target := add(target,seed)
            pop(call(0,div(target,0x1000000000000000000000000),0,0,0,0,0))
            iterations := sub(iterations,1) 
            jumpi(loop, iterations)
        }
    }