*
*
*
*
*
*
*
*
*
*
$include ccall.common
*
      call csub.time(res)

      display 'rem = ' : res

   end
