anchor.diff:        end interface
   
         interface
  -         subroutine plstar( x, y )
  -            use plplot_flt
  -            real(kind=plflt) :: x, y
  +         subroutine plstar( nx, ny )
  +            integer :: nx, ny
            end subroutine plstar
         end interface
   
  
positive.code:       integer, parameter :: PL_FONT_STANDARD   =  0
        integer, parameter :: PL_FONT_EXTENDED   =  1
  
        !
        ! TODO:
        ! Parameters for fill patterns and symbols
  
negative.code: 
        interface
           subroutine plsori( rot )
              integer :: rot
           end subroutine plsori
        end interface
  
  