NONMEM Users Guide Part IV - NM-TRAN
Appendix.IX. Another Example with PREDPP

NONMEM Users Guide Part IV - NM-TRAN

Appendix.IX. Another Example with PREDPP

Figures 7, 11, and 25 of NONMEM Users Guide, Part VI, show a PK routine, an ERROR routine and a NONMEM control stream (with embedded data), respectively. Problem summary pages from NONMEM and PREDPP, resulting from Figures 7, 11, and 25 are shown in Figures 27-28 of Part VI. NM-TRAN inputs and outputs are given on the following pages of this appendix. The inputs correspond to Figures 7, 11, and 25. The resulting problem summary page from NONMEM is a just a little different from that shown in Figure 27 of Part VI due to the fact that NM-TRAN generates EVID, MDV and ID data items. The NM-TRAN data set and control stream are recorded on the NONMEM distribution medium; see Guide III.

NM-TRAN Data Set

      320        .0        .
       .         .27      1.71
       .         .52      7.91
       .        1.        8.31
       .        1.92      8.33
       .        3.5       6.85
       .        5.02      6.08
       .        7.03      5.4
       .        9.        4.55
       .       12.        3.01
       .       24.3        .90

NM-TRAN Control Stream

$PROBLEM  THEOPHYLLINE   SINGLE SUBJECT DATA
$INPUT  DOSE=AMT TIME CP=DV
$DATA  DATA3
$SUBROUTINES  ADVAN2

$PK
CALLFL=1
KA=THETA(1)
K=THETA(2)
SC=THETA(3)

$ERROR
Y=F+ERR(1)

$THETA  (0,1.7)  (0,.102)  (0,29)


$ESTIMATION  MAXEVAL=240  PRINT=2
$COVR
$TABLE TIME
$SCAT    CP VS TIME
$SCAT    PRED VS TIME
$SCAT    RES VS TIME
$SCAT    PRED VS CP  UNIT

NONMEM Data Set - FDATA

  320   .0      1 1 1
       .27 1.71 0 0 1
       .52 7.91 0 0 2
        1. 8.31 0 0 1
      1.92 8.33 0 0 2
       3.5 6.85 0 0 1
      5.02 6.08 0 0 2
      7.03  5.4 0 0 1
        9. 4.55 0 0 2
       12. 3.01 0 0 1
      24.3  .90 0 0 2

NONMEM Control Stream - FCON

FILE    FSTREAM
PROB    THEOPHYLLINE   SINGLE SUBJECT DATA
DATA       1   0  11   6   0
ITEM       6   3   5  11   1   0   0   0   0   0   0
INDX       4   2   1   0   0   0   0   0   0   0   0
LABL    DOSE    TIME      CP    EVID     MDV    .ID.
FORM
(3E5.0,3F2.0)
STRC       3   1   0   0   0   1   0   0   0
THCN       1   0   0
THTA         1.7    .102      29
LOWR           0       0       0
UPPR     1000000 1000000 1000000
DIAG   2
ESTM       0 240   3   2   0   0   0   0   0   0   0
COVR       0   0   0   0   1
TABL       1   1   0   0
TABL       1   2   0
SCAT       1   4
SCAT       2   3   0   0   0   0       0       0   0
SCAT       2   7   0   0   0   0       0       0   0
SCAT       2   8   0   0   0   0       0       0   0
SCAT       3   7   0   0   0   1       0       0   0

Generated and User-Supplied Subroutines - FSUBS

The NONMEM VI versions are shown. With NONMEM 7 and higher, MODULES are used rather than COMMONS.

      SUBROUTINE PK(ICALL,IDEF,THETA,IREV,EVTREC,N,INDXS,IRGG,GG,NETAS)
      IMPLICIT DOUBLE PRECISION (A-Z)
      REAL EVTREC
      SAVE
      INTEGER ICALL,IDEF,IREV,N,INDXS,IRGG,NETAS
      DIMENSION IDEF(7,*),THETA(*),EVTREC(IREV,*),INDXS(*),GG(IRGG,11,*)
      COMMON/PRRAND/ETA(10),EPS(10)
      COMMON/ROCM12/MSEC
      INTEGER MSEC
      COMMON/NMPRD4/KA,K,SC,Y,BBBBBB(0996)
      IF (ICALL.LE.1) THEN
      IDEF(1,01)=-9
      IDEF(1,02)= 1
      IDEF(3,02)= 4
      RETURN
      ENDIF
      KA=THETA(01)
      K=THETA(02)
      SC=THETA(03)
      GG(01,1,1)=K
      GG(03,1,1)=KA
      GG(04,1,1)=SC
      RETURN
      END
      SUBROUTINE ERROR (ICALL,IDEF,THETA,IREV,EVTREC,N,INDXS,F,G,HH)
      IMPLICIT DOUBLE PRECISION (A-Z)
      REAL EVTREC
      SAVE
      INTEGER ICALL,IDEF,IREV,N,INDXS
      DIMENSION IDEF(*),THETA(*),EVTREC(IREV,*),INDXS(*),G(10,*)
      DIMENSION HH(10,*)
      COMMON/PRRAND/ETA(10),EPS(10)
      COMMON/ROCM12/MSEC
      INTEGER MSEC
      COMMON/NMPRD4/KA,K,SC,Y,BBBBBB(0996)
      IF (ICALL.LE.1) THEN
      IDEF(2)=2
      HH(1,1)=1.0D0
      RETURN
      ENDIF
      IF (ICALL.EQ.4) THEN
      CALL SIMETA(ETA)
      ENDIF
      Y=F+ETA(01)
      F=Y
      RETURN
      END

NONMEM File Stream - FSTREAM

DATA    FDATA
****

NM-TRAN Report - FREPORT

NM-TRAN VERSION II LEVEL 1.0
SUBROUTINES FROM THE PREDPP LIBRARY:
PRED PREDI CHECK SADVAN ADVAN2 SSS0 TRANS1 INFN
GENERATED DP SUBROUTINES:
PK ERROR
NONMEM SUBROUTINES: ALL

TOP
TABLE OF CONTENTS