Re: avoiding when ETA()=0
From: Kazimierz
Subject:Re: [NMusers] avoiding when ETA()=0
Date: Wed, 12 Feb 2003 16:37:41 +0100
Dear Dr Piotrovski,
Thank you for your response.
The NONMEM during some ICALL (<2?) probably requires ETA()=0
when $PK or $ERROR calling.
Assuming that individual error is mainly <>0, EXIT could be correct
only in some ICALL=2, ICALL=4.
For examample:
$PK
ER1=SQR(ETA(1)*ETA(1))
ER2=SQR(ETA(2)*ETA(2))
ER12=ER1+ER2
IF (ICALL.GE.2.AND.ER12.EQ.0) EXIT 1,100
IF (ICALL.GE.2.AND.ER12.NE.0) THEN
VD=(ER2*(TVVD1+ETA(1))+ER1*(TVVD2+ETA(2)))/ER12
ENDIF
IF (ICALL.LT.2.AND.ER1.EQ.0) VD=TVVD1 ; when during initialization some ETA()=0 ?
IF (ICALL.LT.2.AND.ER2.EQ.0) VD=TVVD2 ; when ER12=0 VD=TVVD1= TVVD2
$EST ...FOCE INTERACTION....... NOABORT
sincerely Yours
Kazimierz H. Kozlowski, Pharm.D.
The Children's Memorial Health Institute
Laboratory of Pharmacokinetic
Warsaw, Poland
E-mail: khkoz@czd.waw.pl