anchor.diff:  	 call setBoxBreadth(my_box, 6.0)
   	 call setBoxHeight(my_box, 7.0)
   	 call printBox(my_box)
  +	 call destructBox(my_box)
   	 
   end program box_test
  
positive.code: 		 real , intent(in) :: newBreadth
  		 this%breadth = newBreadth
  	 end subroutine setBoxBreadth
  end module boxClass
  
  program box_test
     use boxClass
  	 implicit none
  	 
  	 type(Box) :: my_box
  
negative.code: module boxClass
       implicit none
       private
       public :: Box, printBox, setBoxLength, setBoxHeight, setBoxBreadth, destructBox
  	 ! Using an implicit constructor
       type Box
           real, allocatable :: length
  	     real, allocatable :: breadth
  	     real, allocatable :: height
       end type Box
  contains
       subroutine printBox(this)
  