Re: NCAR Graphics running into integer workspace array limitation?

From: David Brown <dbrown_at_nyahnyahspammersnyahnyah>
Date: Thu, 9 Jul 2009 17:26:51 -0600

Hi Saurabh,

The integer workspace size is passed as an argument to a number of
Conpack routines, which just use the size that is given to them.
If it is not enough, the error message you got is returned. So where
you need to increase the value is in the RIP source code.
I don't know anything about RIP but grepping for iwrk, I find:

grep -n iwrk *.f
hcondraw.f:54: dimension rwrk(5000),iwrk(5000),rect(4),
hcondraw.f:505: call cprect(pslab1,mabpl,njx,niy,rwrk,5000,iwrk,
5000)
hcondraw.f:507: call cpclam(pslab1,rwrk,iwrk,iam) ! put cont.
lines in area map
hcondraw.f:513: call cprect(temp2,morpl,niy,njx,rwrk,5000,iwrk,
5000)
hcondraw.f:515: call cpclam(temp2,rwrk,iwrk,iam) ! put cont.
lines in area map
hcondraw.f:739: call cprect(pslab1,mabpl,njx,niy,rwrk,
5000,iwrk,5000)
hcondraw.f:741: call cprect(temp2,morpl,niy,njx,rwrk,5000,iwrk,
5000)
hcondraw.f:862: call cplbam(pslab1,rwrk,iwrk,iam) ! put label
boxes in area map
hcondraw.f:864: call cpcldm(pslab1,rwrk,iwrk,iam,mask) !
draw contour lines
hcondraw.f:866: call cpcldm(pslab1,rwrk,iwrk,iam,drawcl) !
draw contour lines
hcondraw.f:868: call cplbdr(pslab1,rwrk,iwrk) ! make labels
hcondraw.f:871: call cplbam(temp2,rwrk,iwrk,iam) ! put label
boxes in area map
hcondraw.f:873: call cpcldm(temp2,rwrk,iwrk,iam,mask) !
draw contour lines
hcondraw.f:875: call cpcldm(temp2,rwrk,iwrk,iam,drawcl) !
draw contour lines
hcondraw.f:877: call cplbdr(temp2,rwrk,iwrk) ! make labels
vcondraw.f:46: dimension rwrk(5000),iwrk(5000),rect(4),
vcondraw.f:351: call cprect(pslab1,mabpl,nscrs,mkzh,rwrk,
5000,iwrk,5000)
vcondraw.f:353: call cpclam(pslab1,rwrk,iwrk,iam) ! put cont.
lines in area map
vcondraw.f:536: call cprect(pslab1,mabpl,nscrs,mkzh,rwrk,
5000,iwrk,5000)
vcondraw.f:649: call cplbam(pslab1,rwrk,iwrk,iam) ! put label
boxes in area map
vcondraw.f:650: call cpcldm(pslab1,rwrk,iwrk,iam,drawcl) !
draw contour lines
vcondraw.f:651: call cplbdr(pslab1,rwrk,iwrk) ! make labels

It looks like only 2 routines are involved. You will need to increase
the dimension size of iwrk at
hcondraw.f:54 and/or vcondraw.f:46, depending on which routine(s)
produced the error.
You also need to change the size specified for iwrk in all the calls
to cprect to match the dimension size.

Note that just because the error message says 5100 words were
requested, it does not necessarily mean that 5100 will
be large enough to complete the plots. You will need to experiment
until you arrive at a value that does not produce an
error.
  -dave

On Jul 9, 2009, at 4:31 PM, Saurabh Barve wrote:

> Hi,
>
> We ran a big MM5 simulation, and are now using the RIP program to
> create
> animations. When we run the 'rip' program on our output files, we
> see the
> following errors:
>
> +++++++++++++++++++++
> ...
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> CPGIWS 5100 WORDS REQUESTED 5000 WORDS AVAILABLE
> ...
> +++++++++++++++++++++
>
> A Google search indicated that this might be because of the small
> size of
> the integer workspace array used by NCAR Graphics. I see many
> references to
> the variable "IWRK" in "../ncarg2d/src/libncarg/conpack" and other
> directories under 'libncarg'. Is this the variable that we need to
> modify to
> increase the value of the user integer workspace array? If yes, how
> do we do
> it?
>
> We're using NCL-NCAR Graphics version 5.1.0 on CentOS Linux 5.0 on
> a 64-bit
> Opteron machine. We're not using pre-built binaries, we compiled the
> binaries from the source.
>
> Thanks,
> Saurabh
>
> =========================================
> Saurabh Barve
> Digital Consulting Services (DCS)
> Supporting the Department of Meteorology
> Naval Postgraduate School
> 831-656-3396
> sbarve_at_nps.edu
>
>
> _______________________________________________
> ncarg-talk mailing list
> ncarg-talk_at_ucar.edu
> http://mailman.ucar.edu/mailman/listinfo/ncarg-talk

_______________________________________________
ncarg-talk mailing list
ncarg-talk_at_ucar.edu
http://mailman.ucar.edu/mailman/listinfo/ncarg-talk
Received on Thu Jul 09 2009 - 17:26:51 MDT

This archive was generated by hypermail 2.2.0 : Mon Aug 24 2009 - 11:16:26 MDT