diff options
Diffstat (limited to 'sys/gio/ncarutil/README')
| -rw-r--r-- | sys/gio/ncarutil/README | 219 |
1 files changed, 219 insertions, 0 deletions
diff --git a/sys/gio/ncarutil/README b/sys/gio/ncarutil/README new file mode 100644 index 00000000..6ae35023 --- /dev/null +++ b/sys/gio/ncarutil/README @@ -0,0 +1,219 @@ +Directory gio$ncarutil, with subdirectories conlib, autograph and sysint, +contains the source code for the GKS based NCAR plotting utilities library. +The first public release of this software was installed in IRAF 10SEP86. +(The 3 previous installations of the NCAR Utilities were the result of NOAO +serving as a Beta release test site.) What follows is the Notes files from +the installation : + +****************************************************************************** +Notes for installation of the NCAR GKS based plotting utilities. This +release marks the end of NCAR's beta testing and is the first public release +of the new software. The changes made at NOAO have been merged into the +new source code; these changes have are marked with "+/- NOAO." The IRAF +installed NCAR library differs from the version released on tape as documented +below. Installation was begun September 2, 1986. (S. Hammond) + +Subdirectory AUTOGRAPH -- + +autograph/agback.f: + Calls blockdata agdflt as run time subroutine. +autograph/agcurv.f: + Calls blockdata agdflt as run time subroutine. +autograph/agdflt.f: + This is the block data, which has been completely rewritten as + initialization statements instead of data statements. +autograph/agexax.f: + A ftn write statement has been commented out. +autograph/agppid.f: + A string is written with f77upk/pstr instead of a ftn write statement. +autograph/agrstr.f: + Binary read, completely commented out. +autograph/agsave.f: + Binary write (opposite of agrstr.f), completely commented out. +autograph/agscan.f: + Calls blockdata agdflt as run time subroutine. + A ftn write statement has been commented out. +autograph/agsetp.f: + Calls blockdata agdflt as run time subroutine. +autograph/agstup.f: + Calls blockdata agdflt as run time subroutine. +autograph/ezmxy.f, ezmy.f, ezxy.f, ezy.f: + These four subroutines require identical changes: + Call blockdata agdflt as run time subroutine upon entering; + Call subroutine initag before returning. +autograph/idiot.f: + Call blockdata adgflt as run time subroutine. + Call plotit and initut to reinitialize before returning. +autograph/pstr.x: + This file is not on the distribution tape, it was written to + output strings that have been unpacked by f77upk. + +Subdirectory CONLIB -- + +conlib/conecd.f: + Character variables IT and CHTMP are not used and so are commented out. + The FTN internal writes are rewritten as calls to encode. +conlib/congen.f: + FTN internal write replaced with call to encode. +conlib/conop1.f,conop2.f,conop3.f,conop4.f: + These four routines now call blockdata conbdn as run time initialization. +conlib/conout.f, conot2.f: + Both these routines are no-ops in IRAF. All statements have been commented + out. +conlib/conpdv.f: + FTN internal write replaced with a call to encode. +conlib/conssd.f: + FTN write and format statement commented out. +conlib/contng.f: + FTN internal writes rewritten as calls to encode. + + +Directory NCARUTIL -- + +conran.f: + Changed values of iabove, ibelow and ibel2 to improve label placement. + Blockdata condbn rewritten as run time initialization. (conbdn.f) + Internal writes rewritten as calls to encode. + +conrec.f: + Value of NCRT changed from 4 to 2. + The contour plot labelling has been improved, with the titles being + centered in the current viewport, and the large spaces between + fields eliminated. This change involves: + 1. common block noaolb added; also used in spp calling routine. + 2. Values of LNGTHS array modified. + 3. Character*25 variable string[5] added. + 4. Default plot position is centered on current viewport. + All internal writes have been replaced with calls to encode. + Error message concerning "overflow in STLINE" is now written only + to stderr, not to stdgraph as well. + EZCNTR no longer calls frame. + Block data CONBD deleted from conrec.f source, rewritten as conbd.f + +dashsmth.f: + In two places, the blockdata DASHBD is called as an initializing subroutine. + Subroutines kurv1s and kurv2s are used for both the dashsmth and + isosrf utilities. The code is duplicated in the two fortran files. I + have put it in a separate file (kurv.f) and deleted it from both original + locations. + +gridal.f: + In two places, blockdata GRIDT is called as an initializing subroutine. + All internal FTN writes changed to calls to encode. + FTN write and format statements for error reporting deleted - used seter. + Blockdata deleted from gridal.f; rewritten in gridt.f. + +hafton.f: + Blockdata hfinit rewritten and called as run time initializing subroutine. + One internal write rewritten as call to encode. + Call to FRAME removed from EZHFTN. + +isosrf.f: + Call to FRAME removed from EZISOS + Blockdata isosrb was rewritten as run time initialization isosrb.f + Source for subroutines kurv1s and kurv2s has been deleted from isosrf.f. + (It is shared with the dashsmth utility, and has been moved to kurv.f.) + +pwrity.f: + Blockdata PWRYBD rewritten as subroutine. + FTN writes and format statements commented out. + +pwrzs.f: + Common block noaovp added, so user can control viewport. Calls to + plotit and set had to be changed because they assumed the full + viewport [1-1024] was being used for srface plots. + +srface.f: + Because user changes viewport when labelling is selected, mods had + to be made. Common block noaovp has been added, and calls to set + and plotit no longer assume the full viewport [1-1024] is being used. + Blockdata SRFABD has been rewritten as a run time initialization. + +strmln.f: + The value of uvmsg changed from 1.0E+36 to 1.0E+16 in an attempt + to make this routine run on a VAX. + +threed.f: + Blockdata threbd rewritten as run time initialization. + Subroutine pwrz completely commented out. + +velvct.f: + Blockdata veldat rewritten as run time initialization. + FTN internal write rewritten as call to encode. + + +Subdirectory SYSINT (system interface) -- + +sysint/support.f: + 1. The character size calculated by WTSTR is doubled to be readable + with the IRAF font. + 2. Subroutines SETER and E9RIN both used FTN write statements to + output information. This is now handled by passing the error + message to ULIBER, where the string gets unpacked with f77upk + and written to stderr. + 3. Blockdata UERRBD was rewritten as a run time initialization. + 4. Block data UTILBD was rewritten as a run time initialization. + A logical flag (first) was added to insure that the internal + parameters were initialized only once per load; subroutine + utilbd can be called at several points. An entry point 'utinit' + was added to reset the 'first' flag to true. + 5. In an attempt to mimic the organization of the release tape, file + support.f contains the following fortran subroutines: + SUBROUTINE ENCD (VALU,ASH,IOUT,NC,IOFFD) + SUBROUTINE ENCODE (NCHARS, FTNFMT, FTNOUT, RVAL) + SUBROUTINE ENTSR(IROLD,IRNEW) + SUBROUTINE RETSR(IROLD) + SUBROUTINE ERROF + SUBROUTINE SETER(MESSG,NERR,IOPT) + SUBROUTINE EPRIN + SUBROUTINE E9RIN(MESSG,NERR,SAVE) + SUBROUTINE FDUM + SUBROUTINE Q8QST4(NAME,LBRARY,ENTRY,VRSION) + INTEGER FUNCTION NERRO(NERR) + INTEGER FUNCTION I8SAV(ISW,IVALUE,SET) + SUBROUTINE WTSTR (PX,PY,CH,IS,IO,IC) + subroutine uerrbd + subroutine uliber (errcode, pkerrmsg, msglen) + +sysint/spps.f: + 1. Subroutine FLUSH has been renamed MCFLSH because of a name conflict. + 2. FRAME calls initut to initialize the 'first' flag in utilbd. + 3. Subroutines OPNGKS and CLSGKS have been commented out. + 4. In PLOTIT and PLOTIF the block data utilbd is called as a run time + initialization subroutine. + +**************************************************************************** + +gio$ncarutil/conrec.f Dec 23, 1986 S. Hammond + Moved the call to gsplci that set up major contours. This + statement was not being executed until after the first major line + had been drawn, resulting in the first major line not being bold. + + +*************************************************************************** +On June 1, 1987 the following copywright notice was inserted into all +FORTRAN files in the ncarutil directory tree. + +C +C +-----------------------------------------------------------------+ +C | | +C | Copyright (C) 1986 by UCAR | +C | University Corporation for Atmospheric Research | +C | All Rights Reserved | +C | | +C | NCARGRAPHICS Version 1.00 | +C | | +C +-----------------------------------------------------------------+ +C +C +February 12, 1988. During Steve Rooke's port of IRAF to the HP RISC computer +several Fortran errors were caught by the HP compiler. These have been +fixed as shown: +sys/gio/ncarutil/conbdn.f + The data statement at line 244 had not been commented out. It is now. + +June 10, 1988. Made a mod to conbd.f (and in the comments to conrec.f) that +resets the point at which contour decides an image aspect ratio is "extreme". +Previously if the image axes ratio exceeded 1:4 the contour plot was square. +This limit was too restrictive and has been changed to 1:16. See related +change in pkg$plot.vport.x. |