(ns funimage.line-rotator
 (:require [clojure.string :as string])
 (:import [mpicbg.imglib.image Image]
          [mpicbg.imglib.cursor Cursor]
          [script.imglib ImgLib]
          [mpicbg.imglib.type.numeric NumericType]
          [ij IJ]
          [ij.process ImageConverter]))
 
;(set! *warn-on-reflection* true)

(def imp (IJ/getImage))

(def ROI (.getRoi imp))

(def angle (.getAngle ROI))

(IJ/run "Rotate... " 
	(str "angle=" angle " grid=1 interpolation=Bilinear stack"))
