Has anybody actually used plslabelfunc in a Fortran program? I've been
trying and it appears to be ignored. The demo program that follows (at
least for me) gives no indication that 'label_fmt' ever gets called. So I
thought I'd just check in case I'm doing something silly before I report a
bug.

I'm using plplot 5.9.9 on Manjaro Linux (Arch derivative) with gfortran
4.7.2.

James

==== DEMO PROGRAM =====

module fmtf
  use plplot
  implicit none
contains
  subroutine label_fmt(axis, value, label, length)
    integer :: axis, length
    real(kind=plflt) :: value
    character(len=length) :: label

    print *, axis, length, value

    if (axis == 1) then
       write(label, "('x',f3.1,'x')") value
    else
       write(label, "('y',f5.3,'y')") value
    end if
    print *, label
  end subroutine label_fmt
end module fmtf

program axis_fmt
  use plplot
  use fmtf

  implicit none

  call plparseopts(PL_PARSE_SKIP)
  call plinit()

  call plslabelfunc(label_fmt)

  call plenv(0._plflt, 8._plflt, 0._plflt, 12._plflt, 0, 0)

  call plend
end program axis_fmt
------------------------------------------------------------------------------
The Go Parallel Website, sponsored by Intel - in partnership with Geeknet, 
is your hub for all things parallel software development, from weekly thought 
leadership blogs to news, videos, case studies, tutorials, tech docs, 
whitepapers, evaluation guides, and opinion stories. Check out the most 
recent posts - join the conversation now. http://goparallel.sourceforge.net/
_______________________________________________
Plplot-general mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/plplot-general

Reply via email to