Generated Code
The following is c code generated by the CellML API from this CellML file. (Back to language selection)
The raw code is available.
/* There are a total of 2 entries in the algebraic variable array. There are a total of 9 entries in each of the rate and state variable arrays. There are a total of 38 entries in the constant variable array. */ /* * CONSTANTS[0] is BW in component main (kilogram). * CONSTANTS[1] is Qcc in component main (litre_per_hr_kg). * CONSTANTS[2] is Qliv in component main (dimensionless). * CONSTANTS[3] is Qfat in component main (dimensionless). * CONSTANTS[4] is Qbrain in component main (dimensionless). * CONSTANTS[5] is Qslow in component main (dimensionless). * CONSTANTS[20] is Qc in component main (litre_per_hr). * CONSTANTS[28] is Ql in component main (litre_per_hr). * CONSTANTS[33] is Qf in component main (litre_per_hr). * CONSTANTS[35] is Qbr in component main (litre_per_hr). * CONSTANTS[36] is Qs in component main (litre_per_hr). * CONSTANTS[37] is Qr in component main (litre_per_hr). * CONSTANTS[6] is Vblood in component main (dimensionless). * CONSTANTS[7] is Vbrain in component main (dimensionless). * CONSTANTS[8] is Vliver in component main (dimensionless). * CONSTANTS[21] is Vfat in component main (dimensionless). * CONSTANTS[9] is Vslow in component main (dimensionless). * CONSTANTS[29] is Vrap in component main (dimensionless). * CONSTANTS[30] is Vf in component main (litre). * CONSTANTS[22] is Vs in component main (litre). * CONSTANTS[23] is Vl in component main (litre). * CONSTANTS[34] is Vr in component main (litre). * CONSTANTS[24] is Vbr in component main (litre). * CONSTANTS[25] is Vb in component main (litre). * CONSTANTS[31] is Vven in component main (litre). * CONSTANTS[32] is Vart in component main (litre). * CONSTANTS[10] is Pfat_bl in component main (dimensionless). * CONSTANTS[11] is Pslow_bl in component main (dimensionless). * CONSTANTS[12] is Pliv_bl in component main (dimensionless). * CONSTANTS[13] is Prapid_bl in component main (dimensionless). * CONSTANTS[14] is Pbrain_bl in component main (dimensionless). * CONSTANTS[15] is dose in component main (mg_per_kg). * CONSTANTS[16] is F in component main (dimensionless). * CONSTANTS[26] is D0 in component main (mg). * CONSTANTS[17] is Ka in component main (per_hr). * CONSTANTS[18] is Kfc in component main (per_hr). * CONSTANTS[27] is KF in component main (per_hr_kg). * VOI is t in component main (hr). * STATES[0] is A_fat in component main (mg). * STATES[1] is A_slow in component main (mg). * STATES[2] is A_liv in component main (mg). * STATES[3] is A_rapid in component main (mg). * STATES[4] is A_brain in component main (mg). * CONSTANTS[19] is A_blood in component main (mg). * STATES[5] is A_stomach in component main (mg). * STATES[6] is A_ven in component main (mg). * STATES[7] is A_art in component main (mg). * STATES[8] is A_liv_CL in component main (mg). * ALGEBRAIC[0] is C_art in component main (mg_per_litre). * ALGEBRAIC[1] is C_brain in component main (mg_per_litre). * RATES[6] is d/dt A_ven in component main (mg). * RATES[7] is d/dt A_art in component main (mg). * RATES[0] is d/dt A_fat in component main (mg). * RATES[1] is d/dt A_slow in component main (mg). * RATES[4] is d/dt A_brain in component main (mg). * RATES[3] is d/dt A_rapid in component main (mg). * RATES[5] is d/dt A_stomach in component main (mg). * RATES[2] is d/dt A_liv in component main (mg). * RATES[8] is d/dt A_liv_CL in component main (mg). */ void initConsts(double* CONSTANTS, double* RATES, double *STATES) { CONSTANTS[0] = 0.1615; CONSTANTS[1] = 14; CONSTANTS[2] = 0.25; CONSTANTS[3] = 0.09; CONSTANTS[4] = 0.03; CONSTANTS[5] = 0.278; CONSTANTS[6] = 0.05; CONSTANTS[7] = 0.0116; CONSTANTS[8] = 0.04; CONSTANTS[9] = 0.63; CONSTANTS[10] = 186; CONSTANTS[11] = 3.4; CONSTANTS[12] = 6.1; CONSTANTS[13] = 6.1; CONSTANTS[14] = 3; CONSTANTS[15] = 60; CONSTANTS[16] = 0.8; CONSTANTS[17] = 0.1; CONSTANTS[18] = 6; STATES[0] = 0; STATES[1] = 0; STATES[2] = 0; STATES[3] = 0; STATES[4] = 0; CONSTANTS[19] = 0; STATES[6] = 0; STATES[7] = 0; STATES[8] = 0; CONSTANTS[20] = CONSTANTS[1]*pow(CONSTANTS[0], 0.740000); CONSTANTS[21] = 0.0100000*( 20.0000*CONSTANTS[0]+1.66400); CONSTANTS[22] = CONSTANTS[9]*CONSTANTS[0]; CONSTANTS[23] = CONSTANTS[8]*CONSTANTS[0]; CONSTANTS[24] = CONSTANTS[7]*CONSTANTS[0]; CONSTANTS[25] = CONSTANTS[6]*CONSTANTS[0]; CONSTANTS[26] = CONSTANTS[16]*CONSTANTS[15]*CONSTANTS[0]; CONSTANTS[27] = CONSTANTS[18]/pow(CONSTANTS[0], 0.300000); CONSTANTS[28] = CONSTANTS[2]*CONSTANTS[20]; CONSTANTS[29] = (((1.00000 - CONSTANTS[6]) - CONSTANTS[8]) - CONSTANTS[21]) - CONSTANTS[9]; CONSTANTS[30] = CONSTANTS[21]*CONSTANTS[0]; CONSTANTS[31] = 0.750000*CONSTANTS[25]; CONSTANTS[32] = 0.250000*CONSTANTS[25]; CONSTANTS[33] = CONSTANTS[3]*CONSTANTS[20]; CONSTANTS[34] = CONSTANTS[29]*CONSTANTS[0]; CONSTANTS[35] = CONSTANTS[4]*CONSTANTS[20]; CONSTANTS[36] = CONSTANTS[5]*CONSTANTS[20]; CONSTANTS[37] = (((CONSTANTS[20] - CONSTANTS[28]) - CONSTANTS[33]) - CONSTANTS[35]) - CONSTANTS[36]; STATES[5] = CONSTANTS[26]; } void computeRates(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { RATES[6] = (( CONSTANTS[33]*STATES[0])/CONSTANTS[30])/CONSTANTS[10]+(( CONSTANTS[35]*STATES[4])/CONSTANTS[24])/CONSTANTS[14]+(( CONSTANTS[36]*STATES[1])/CONSTANTS[22])/CONSTANTS[11]+(( CONSTANTS[28]*STATES[2])/CONSTANTS[23])/CONSTANTS[12]+(( CONSTANTS[37]*STATES[3])/CONSTANTS[34])/CONSTANTS[13]; RATES[0] = CONSTANTS[33]*(STATES[7]/CONSTANTS[25] - (STATES[0]/CONSTANTS[30])/CONSTANTS[10]); RATES[1] = CONSTANTS[36]*(STATES[7]/CONSTANTS[25] - (STATES[1]/CONSTANTS[22])/CONSTANTS[11]); RATES[4] = CONSTANTS[35]*(STATES[7]/CONSTANTS[25] - (STATES[4]/CONSTANTS[24])/CONSTANTS[14]); RATES[3] = CONSTANTS[37]*(STATES[7]/CONSTANTS[25] - (STATES[3]/CONSTANTS[34])/CONSTANTS[13]); RATES[5] = - CONSTANTS[17]*STATES[5]; RATES[2] = ( CONSTANTS[28]*(STATES[7]/CONSTANTS[25] - (STATES[2]/CONSTANTS[23])/CONSTANTS[12]) - (( CONSTANTS[27]*CONSTANTS[23]*STATES[2])/CONSTANTS[23])/CONSTANTS[12])+ CONSTANTS[17]*STATES[5]; RATES[8] = (( CONSTANTS[27]*CONSTANTS[23]*STATES[2])/CONSTANTS[23])/CONSTANTS[12]; RATES[7] = RATES[6] - ( CONSTANTS[20]*STATES[7])/CONSTANTS[25]; } void computeVariables(double VOI, double* CONSTANTS, double* RATES, double* STATES, double* ALGEBRAIC) { ALGEBRAIC[0] = STATES[7]/CONSTANTS[25]; ALGEBRAIC[1] = STATES[4]/CONSTANTS[24]; }