module plots_interface

interface
 subroutine focus_lens(radius,arc_length,width, x0,y0,tilt_angle, fdfb)
  use precision_def
  implicit none
  real(rp) size, x0,y0, tilt_angle, arc, radius, darc
  real(rp) arc_length, width
  integer i,n, fdfb
 end subroutine
end interface

interface
 subroutine rotate(theta,x,y,m)
  use precision_def
  implicit none
  real(rp) theta, x(0:), y(0:), a(0:m), b(0:m)
  integer m,i
 end subroutine
end interface

end module