Permalink
Browse files

Update OCR/Rotation.ml

  • Loading branch information...
1 parent 202a2df commit 9f5fcf8870d35e311f8f211df140cb13b05381f7 @dezyal dezyal committed Oct 17, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 OCR/Rotation.ml
View
2 OCR/Rotation.ml
@@ -15,7 +15,7 @@ let rotate mtx w h a =
let new_x = int_of_float(
(float)x*.cos(a) -. (float)y*.sin(a))
and new_y = int_of_float(
- (float)(-x)*.sin(a) +. (float)y*.cos(a)) in
+ (float)(x)*.sin(a) +. (float)y*.cos(a)) in
new_mtx.(new_x).(new_y) <- mtx.(x).(y)
done
done;

0 comments on commit 9f5fcf8

Please sign in to comment.