RE: Trouble increasing ETA capacity in NMV 1.1
From: slaporte silvy.laporte@chu-st-etienne.fr
Subject: RE: [NMusers] Trouble increasing ETA capacity in NMV 1.1
Date: Thu, April 29, 2004 10:17 am
Justin,
You can use this modified code (in NSIZES).
With LAPR=81 (15+66+10) then I=SQRT(162)=12
then LPAR2=12*13/2=78.
Hope this helps.
Silvy Laporte
code:
C LTH: MAX. NO. OF THETA'S
PARAMETER (LTH=15)
C LVR: MAX. NO. OF ETA'S + EPS'S
PARAMETER (LVR=66)
C LVR2: MAX. NO. OF ETA'S PERMITTED WHEN LAPLACIAN METHOD IS USED
PARAMETER (LVR2=10)
C LPAR: MAX. NO. OF PARAMETERS THAT MAY BE ESTIMATED
PARAMETER (LPAR=81)
C LPAR2: I*(I+1)/2 WHERE I=SQRT(FLOAT(2*LPAR))
PARAMETER (LPAR2=78)
C LPAR3: MAX(2850,LPAR*(LPAR+1)/2)
PARAMETER (LPAR3=3321)
C MTHVR: MAX(LTH,LVR)
PARAMETER (MTHVR=66)
C NO: MAX NO. OF OBSERVATION RECORDS / INDIVIDUAL RECORD
PARAMETER (NO=350)
C LNP4: SIZE OF COMMON NMPRD4
PARAMETER (LNP4=1000)
C LWS1: SIZE OF WORKING SPACE 1
PARAMETER (LWS1=42000)
C LADD: SHOULD EXCEED NO*(NO+1)/2 * (NUMBER OF DIAGONAL BLOCKS OF SIGMA)