AnonMiraj / fig

FIG (Fortran Intuitive Graphics)
MIT License
27 stars 2 forks source link

Create `drawing` class #16

Closed perazz closed 4 months ago

perazz commented 4 months ago

cc https://github.com/AnonMiraj/fig/pull/12#issuecomment-2123336404

Separate the drawing primitives from the canvas by creating a new type(drawing) class:

   type:: drawing 
         real :: width, height
         character(len=:), allocatable :: title
         type(shapeWrapper), allocatable :: shapes(:)
         integer :: shape_count
     contains
         procedure :: add_shape
         procedure :: init
     end type drawing