function retval = block2 (vr) retval = 7 * vr; endfunction