Greetings. Using Fortran NCARG calls, I am trying to create a stored
file of plot commands that I can recall at a later time in _another_
ploting run (the stored file will consist of topography to be overlaid
onto plots generated later). I am attempting to use the GKS "GFLAS"
flash routines to do this, with the attached code outline illustrating
the process. The GFLAS1 and GFLAS2 routines seem to work, in that
when activated the LLU plot segment disappear from the NCGM file. And
they can be recalled within the program using the GFLAS3 command, with
the plot then appearing just as it did with no GFLAS calls included.
BUT - according to the GFLAS documentation the plot commands following
GFLAS1 are supposed to be written to a new file GNFB01 created on the
current directory (so that they can later be read using the GFLAS4
routine), but I can find no such file or any newly created file on
that directory or elsewhere. Does anyone know whether such a file is
actually being created, per the documentation, and if so where it
might be?
Jack
---------- CODE SNIPPET FOLLOWS ---------------
*** hlu initialization of NCGM workstation
call NhlFRLClear(kgrlist)
call NhlFRLGetInteger(kgrlist,'wkGksWorkId',kgksNCGMwid,ierr)
call NhlFGetValues(kwidNCGM,kgrlist,ierr)
*** activation of gks workstation
call gacwk(kgksNCGMwid)
*** activate WISS
CALL GOPWK(9,1,3)
*** start storage of llu plot commands
CALL GFLAS1 (1)
*** LLU PLOT COMMANDS
*** end storage of llu plot commands
CALL GFLAS2 (1)
*** recall stored plot commands
ccc if following not included, llu portion disappears from plot
ccc if it is included, get same plot as with GFLAS calls removed
CALL GFLAS3 (1)
*** deactivate WISS
CALL GCLWK (9)
*** deactivation of gks workstation
call gdawk(kgksNCGMwid)
*** HLU PLOT COMMANDS
call NhlFFrame(kwidNCGM,ierr)
-- MAIL| Dr. John W. (Jack) Glendening Meteorologist SENT| Naval Research Lab - Monterey glendening@nrlmry.navy.mil FROM| 7 Grace Hopper Ave Monterey, CA 93943 831-656-4725
This archive was generated by hypermail 2b29 : Tue May 29 2001 - 22:49:56 MDT