params <- c( 
BODYWT=60.068,
MW=201.2,

VOLBLOODC=0.0594,
VOLFATC=0.331,
VOLBRAINC=0.0204,
VOLLIVERC=0.0204,
VOLRESTC=0.3663,
VTBC=0.05,

CARDOUTPC=348.1,
HCT=0.418,

FRFATC=0.0772,
FRBRAINC=0.164,
FRLIVC=0.2446,
FRRESTC=0.515,

PBRAIN=0.5,
PFAT=5.44,
PLIV=1.15,
PREST=0.66,
PRBC=0.78,

FuLIV=0.17,
FuBRN=0.39,
FuRBC=0.25,
FuPLS=0.2,

PAFC=2.435,
PARC=10.26,
PALC=35.5,
PABC=2.74,
PARBC=100.0,

FA=0.3,
FM=0.25,

VKM1C=20.4,
VKM2C=23.7,
KC=0.0428,

UCLNC=0.5,

TRACh=11700000.0,
KiAChB=0.927,
KdAChB=0.01,
KrAChB=2.014,
BACh=462962.0,
KiAChPLS=1.0,
KdAChPLS=0.1,
KrAChPLS=1.0,
PLSACh=1.0,
KiAChRBC=1.854,
KdAChRBC=0.01,
KrAChRBC=2.014,
RBCACh=395740.0,
TRBCh=3660000.0,
KiBChPLS=0.198,
KdBChPLS=0.1,
KrBChPLS=1.189,
PLSBCh=99760.0,

KA=6.5,
BDOSE=0.0,
BREPS=1.0,
BLEN=0.0,
DDOSE=0.0,
VDW=0.68,
DREPS=1.0,
INHDOSE=0.0,
INHTLEN=8.0,
INHDAYS=7.0,

TV=0.404,
DS=0.1073,
RESPR=640.0,

PPA=1000.0,
DRMDLEN=0.0,
DRMELEN=8.0,
EXPAREAC=1.0,
BSA=1.6576,
RDRMEXPC=3.0,
TSTART=0.0,
TOTDAYS=1.0
 )