This archive contains answers to questions sent to Unidata support through mid-2025. Note that the archive is no longer being updated. We provide the archive for reference; many of the answers presented here remain technically correct, even if somewhat outdated. For the most up-to-date information on the use of NSF Unidata software and data services, please consult the Software Documentation first.
David, I have made the change to incint.f for our next distribution and passed this information back to NCEP. Thanks, Steve Chiswell Unidata User SUpport On Thu, 13 Dec 2001, Unidata Support wrote: > > ------- Forwarded Message > > >To: address@hidden > >cc: address@hidden (Harry Edmon) > >From: David Ovens <address@hidden> > >Subject: fix for GEMPAK incint.f > >Organization: UCAR/Unidata > >Keywords: 200111270046.fAR0ksN21676 > > Gempak Support Folks (Steve Chiswell), > > I have a fix for incint.f that now allows a user to specify FINT in > gdplot2 with more than 72 characters (before this the values get > truncated at character 72) so the following > > FINT = > -50;-47;-44;-41;-38;-35;-32;-29;-26;-23;-20;-17;-14;-11;-8;-5;-2;1;4;7;10;13;16;19;22;25;28;31;34;37 > > is treated like > > FINT = > -50;-47;-44;-41;-38;-35;-32;-29;-26;-23;-20;-17;-14;-11;-8;-5;-2;1;4;7;1 > > and you get > [GEMPLT -30] NOMONO - Points are not monotonic. > > So in NAWIPS-5.6.E.1/gempak/source/gemlib/in/incint.f, change: > CHARACTER*72 substr (3) > to > CHARACTER*(LLMXLN) substr (3) > > I have not examined the other files in the directory in detail, but a > 'grep 72 *.f' yields these other potential problems: > > inaxis.f: CHARACTER*72 substr (4) > incclr.f: CHARACTER carr (4)*72, first*4, last*4, inc*4, > tstr*72 > incint.f: CHARACTER*72 substr (3) > inintc.f: CHARACTER*72 substr (3) > inparm.f: CHARACTER prmstr*72 > inrvec.f: CHARACTER rrr*72, rrr2*72 > inskip.f: CHARACTER carr (2)*72 > intxtn.f: CHARACTER chtext (6) *72 > > > Thanks, > > David > -- > > David Ovens e-mail: address@hidden > (206) 685-8108 plan: Real-time MM5 forecasting for Pacific Northwest > Research Meteorologist > Dept of Atmospheric Sciences, Box 351640 > University of Washington > Seattle, WA 98195 > > > ------- End of Forwarded Message >