some issues about NONMEM

From: Nick Holford - n.holford@auckland.ac.nz Subject Re: [NMusers] some issues about NONMEM Date: 2/11/2004 10:50 PM Marc, Thanks for your patch list. I would like to add this set of 3 patches to tr\GENCOM.for which fixes code generating FSUBS with large NM-TRAN LIBRARY models (Suggested by Stu Beal 11 July 2002). GENCOM Fixes bug for emitting BBBBBB() code CHARACTER*12 WORK C Insert after previous declaration for WORK CHARACTER*13 WORKX Replace following commented code: C WRITE (WORK,'(A,I4.4,A)') 'BBBBBB(',I,')' C IF (LL.EQ.14) THEN C LINE(LL+1:)=WORK C LL=LL+12 C ELSE C LINE(LL+1:)=','//WORK C LL=LL+13 with this WRITE (WORKX,'(A,I5.5,A)') 'BBBBBB(',I,')' IF (LL.EQ.14) THEN LINE(LL+1:)=WORKX LL=LL+13 ELSE LINE(LL+1:)=','//WORKX LL=LL+14 C Fixes bug for emitting DIMENSION COM code Replace following commented code: C WRITE(LINE,'(A,I4.4,A)') 'DIMENSION COM(',COMMAX,')' C LL=19 with this WRITE(LINE,'(A,I6.6,A)') 'DIMENSION COM(',COMMAX,')' LL=21 -- Nick Holford, Dept Pharmacology & Clinical Pharmacology University of Auckland, 85 Park Rd, Private Bag 92019, Auckland, New Zealand email:n.holford@auckland.ac.nz tel:+64(9)373-7599x86730 fax:373-7556 http://www.health.auckland.ac.nz/pharmacology/staff/nholford/