Changeset 490

Show
Ignore:
Timestamp:
07/30/07 17:13:32 (1 year ago)
Author:
shans
Message:

removed print debug

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • ocaml-remix/trunk/transparency.ml

    r488 r490  
    1010  let raw_ostart = _to_raw ostart in 
    1111  let raw_olength = _to_raw olength in 
    12   Printf.printf "ramp %d-%d (render %d-%d)\n" raw_start raw_length raw_ostart  
    13     raw_olength; 
    1412  let _fill pos =  start_val +. 
    1513      float_of_int (pos + raw_ostart - raw_start) /.