From dd9ce549f4abd73084b695e41dbe139e8eb0fe2a Mon Sep 17 00:00:00 2001 From: "Matthew L. Fidler" Date: Sat, 4 Nov 2023 22:36:00 -0500 Subject: [PATCH] ::document and use rxode2::rxReservedKeywords --- R/symengine.R | 4 ++-- data/rxReservedKeywords.rda | Bin 736 -> 733 bytes data/rxResidualError.rda | Bin 1691 -> 1694 bytes data/rxSyntaxFunctions.rda | Bin 2451 -> 2446 bytes man/reexports.Rd | 1 - man/rxFun.Rd | 21 +++++++++++++++++++++ man/rxSolve.Rd | 12 ++++++++---- man/rxode2.Rd | 14 ++++++++++++-- 8 files changed, 43 insertions(+), 9 deletions(-) diff --git a/R/symengine.R b/R/symengine.R index 9b33128b6..03c649e1e 100644 --- a/R/symengine.R +++ b/R/symengine.R @@ -3268,8 +3268,8 @@ rxSupportedFuns <- function() { x <- as.character(x) if (!exists("res", envir=envir)) { envir$res <- c(rxSupportedFuns(), - rxReservedKeywords[, 1], - strsplit(paste(rxReservedKeywords[, 3],collapse=","),"[,]+")[[1]]) + rxode2::rxReservedKeywords[, 1], + strsplit(paste(rxode2::rxReservedKeywords[, 3],collapse=","),"[,]+")[[1]]) } if (x %in% envir$funs) { return(paste0("_qf_", x)) diff --git a/data/rxReservedKeywords.rda b/data/rxReservedKeywords.rda index 9e7cff144d4614822729e63d65692d7c3df83454..80fc13cd1332ee7e68cacfe73ae72df8290d41e0 100644 GIT binary patch delta 714 zcmV;*0yX{M1>FS>LRx4!F+o`-Q(0HNVYZPDA%DhLkZ4JvJx8geVtEZGs0XBB00*cB zo}e@u22BR06H`g)6Ve$OG#MEH00006fN0Y|=8YN}VF1$tX`l>-h9C_XjSLZx0V0}{ zK#es$s$yW6XbFIrBLu@F(<4vR352eMp<8eXMVU!jqIgxBLNBztm<>hvRTEym-nK*{ zvwvRl>x2SWO(Vy1=c#n!sXnySeH~jh=#A`RmZ8GLQM-0m$oB+e6A_J;i_GYlLdcLx zhAE_kJ#gJop$1?eOhN_~~k@uZ?d4_d#<&f-v(`>&8E0<-=ugk^LRx4!F+o`-Q(4AOU-yv?A%E4DRR)AW)M+$54^llRq{w|vO#*239;m@EO`OOV5o;_*T$dg->WjY}Si%^{k_dQH5*sBM(3oYk{kmB$pXO7# z_W)((pJ0K4L&v)Ie5^eQZY~hI2>5DhyYoi{L)&nSEgsV_PFBebUXf$NHI|7Dl?R*7 zE}|oNMw=Gk3v9^5zyQAcvu6m7&3{0nbiIie=eNc9+Y_!KNI60S4~2BRgUs*W$9VY{ zI&o8eHCHn!=oSscu#W0kk_cdM$s%g8G4}M0$^m)}L|>NI&cj5<1oTpk%fxmnN)%@@ z7$i5AMN}3fz-u?pmaI0S2k`24Hs5m zg6Kr;K84c_?Nzm7&UVuNli`f;KvbeI$^L_@}5x8 zWDO4#@*_-x)W{73KpHd#fuW(GdPc&4-l%W@4FC-QXaE4whyWS@0000Q07XA)RDc1K zAOIQ-8UO=8001-q0000bKUAe8(HIG}3;+NSU;qFB35dZl7ytkwq*8h^m`npnv=b9X z0DmSEIH1!##fg3=KgER;|Kzfa- zfYV1ZNv+qKi8?uG+@}l?+~K06e0ZZD7yEMfcS=>ge|O9K`e9Geiga{yYLO1SOXx-N zuZb9qetYBQ*tP$^4(-?Kt96#!4u3c9M#$rXZ_~%0u6&$@^}^Mlv<{C zGb0l+E#=Y7B-*OrM#YkI2DQ7kjRZ!G zNj9qG*=5jXW_0}b+tG3`i!fqLFn_R$BIM-dRhiXwJuVVSAOM+UVr7wumR!24sOkSo zu-Z+Pd7?f}$8~A?`FFEVv8Hx!M%a!mkf`R~8ibj&!8#cx0$_G=CPH>hCr*&=21ToQ z-Q#k&-L=DoyS1X>nB!}K8AZb@SY~HAW@jbI$lgaBE;vr`3?acLbU>Lg0Dpi4f!!gH z2pHCzyDiM(1~CAVrc)V+7{mffnM~x%Ez3R7w%t_CTUgCoS-F{RwA*G_wQWpkjRQ?H zH*U;hH)2i3m}g1hh+VGm%JJ@I8Vy4R!;)?Vu-dm;<(fvJgMH!YIfQTRzqiN2^zp;L z$Ge@Z&DEPKwB6OR%F}mN%YQ3tHj)D(6CzBJ5eX!cNhFdRZtccqBt~S6#${N>V=}i- zgIx^**e`zyX|~f{MU^mEExh^^*LLpSO6k-toB-KY3DPSCCJ2xz!M2+cO3;Z9@T$S@ z%JnjN6?+nQ$u)N%u=e?T+NaR?bS@n1dOA7DGX2|a@(DX7Hx+$9b$<)EJ^Vi6&8zoEMUx$>0_tOkZ$vdJyWPj zgkQtZThgbx;ruRXZ4vd=SFYY8XSvprcddE4gnO9m)K*JJU%}p~^SAh!<=RT_do2}L zJ>b+Us7cHDan9H3moEPT&MUXe6;pGcGD*|(+250OSz^hO%6|xjC=vvepa2E{0Eksf zGdZg=TsMhu<#~3CJ&ys}Q$Fq7Zkd>>oG&+WC=P4Z{6;ul30sXBY;cQR8Lt2_-g zl4>evZdlO9?IqVOG*mb;F4hI(=kB_;LvX3Fxz`O@!6u#>04sOJ+DvyamS8XhGCdy zS(7Tltv7^k!VifjnI~jNz2s;~-O->f?7IuQ;`X@2Y$W1b1aT3eSF#?E!2a=p?+z{g z>NrtoioqMk@b8QdIKb$1c?F(PCmllX{;l5Nlfd94^?!C$wF><>5rD8qjqHAQ;T$FX zJv_7KeBWF_=ZQAmcJ)whvf(p_Tp za2W(-0R|*wMOH<0n$QLE7;)dr`fhWdbFAhnA7hcz6o7bufTv2vw|BIRN~!j^oUG)z z-6fbsGk?AJ)P&326ds`ntTZf787*eIvkb_6EI5j)n}&hJU0X~F4s8XZ~8z^nT gP-&t`RdW$4B6wp&Q?{rbgg@f$NT&)C2rTI<;M3+JFaQ7m delta 1683 zcmV;E25kAB4Vw)PLRx4!F+o`-Q(3`pPScSN9e=-l0Q!^{%|jso0FVF!$DR_ZO_cJC zgFwi5nN1or9;Sc{jR47@G8zp5rph)H14DoSXaHyfKmZ1eKmgDH0002c0jc7p4FCWD z0000000000000>Tr|Ojwo}g$GCICzm0$>1)OpE}G1k(TjOeO?XDWGYf0000000w{t zfPVl04FCg80+gXNK{99>nW?6e)Y^?tDe8KfdXH1o^qOS!nE(f<00Y!{N2E5U)aFSw zyZNY-qpL>+IN*;D9Tg+!!9oH*Oz%{(D6F{a|45raQ`!MYks-nn2zFv$3}2fnXZ>)# zWMVb@kE5Gn*Zq0;aK9y7EVkHkzbZCIEPoq)Jh}Sk)zmM(7Oe%KU0v>a;in{Y-M{(H zIG+YHv#XqSjd$E@rD@TDv#-BVGef_)(3~uzEdz+;H4U74ssBBj9D^flN<2rigdbue z8B!OcB_@Vi>7_2TU|6ESrVA1^Kn1B~e%a;ty;HoU5vgF+W03-ka8B;P$ z$hR(zVJ6jA5;iQA&a*Qtw26dl0X46$i&Md6D+xEp1*hh2-;1R zdLllq$BAkGeO^4%!~#m0OlBZs5D6+}GmcqqS?&e4>ZWSi#%kKl%*%DA+cL$gYL>04-8nf4 zITl%RR;ka|Q4qV{F_q@v%rqK?4Tn;21+dzp} z<5iw$rkiaw)LByng4@%fO?YtdWUie;>A<@7PxMuk^Q6bkmy7i@oc|V)^(w5sysu{` za<6hvAttX379Rgs$Etik;h}NoW7W~lNtfl@Z>UMxDZs1l{77CGP=9{Nez0JE*nSZ3 zIzG_MhB6nu)7>Qe?Vj6D0zWWG>6ZRZ-+Z|+E6dw$=)zB9j^5_NroB(W!N#d>B>S>! zCxy?NVSFOFg?r zySuL0PuCD(S7@n_UVqsp{PUrfFlH$8g&dl7ipQ&xi$%LEV9b&0n8GNyX6-}7O6UXhng1gqVdTvv!@kTd@F0O zvynsRRbIP~b$__2rk0ZLUTZNJSrW*NemO9=gjl{qf6|S%zVlW?7Re z!mT$5-v~Zro`ju|A0Kl4~%ke@gt2E zh^!H~+&qH=(l9z59m3Bzla`@*KPL}>N!sEh_O?{D3V-@=BLQHKGu-*y1aX(?^z~=h z`##u%(-LjM@M@~NOJOGNZ5nKhBgIyWBGF)JFF|UP*cGaVxUE7sTk|7rCEpjdfo|1= zT1$OCo%wTd3iQ2N`#xXi`G3juK6A)yu6Q_O4~~zIm3r+gcUO~&+C8l!D@6)!63jBG z-t);rU3}geF42Zq7!)Uqmin$JvhrR+J>qGi(WY^jBErKAF!N00jh_QV^6XJ2aFV{v zm65DjKTo0|5M7lnFI7QRQ%xVUW_6i7WRgjZiG_LsCZGuIA_1kRC<=sVz@f5+>Ak$}oz6HGV&02%-QGBh#(00001k&pleLBIe2&;S9Ep^yLo000b( zfB-TCi4#*yiIdSXr|M+`BQ(^(JwOJ76AeL-^lBIxPf7ZjO*Hif0009(00u^eKmY&$ z0Dm$v0077mBqo3$B+X1F6!jjFlSslChD`yW$)gC+X!SBOWEUVvlGNk^Mh`u-uvW1N zA2Sjfk9t5PO*Fkco|^;$t%>hIgpgrr8cRI%_l_8EPaacALbJ}t=&oj#hvbFBX9IFx zw;ULq=1G9xQHv8K)HCU2tPIRlwh2D1cz>t$ONN0;K*~k>TPfgF866VZ~ijA@ND3$4G#PAZ}Qcla%oMSMx4*0$ym65HJ7+93UjgFgGLvVB26efi{z4 z6JR7ZBsK}LAY%}TF(D*x=YRmC0b8&0s9LkuL94&+OP+yE`>&W*_$z40AdXp_$bY3u z8_L1+^p_mUYS3Y4<+r~@aPnFblEDxfxrvo$DY==;=V6D@d03hSI~nwa3$Efe;V#-m zDM?a#>o|ciBXk$qGqaOXp*u)ghGvXL18s%`u?8J~Gz*ksC$*664k(bVY7J&VC0sMj zJkng2Q4ftu`}pX$K7#4*AkNz>q<=Vq8y31q)({#hhB**i7MlXAT?kkhh`qg83oUL5 zP8H3xQ?#>5Pe&gXnAts+V8n=5G92?PQ)<##5i+A#d)2Obi`|;?E~L%!o7&OB`wEyJ z6@+5mfn@D_3Oz!(lCs<8LkBmDEhc1EQY$O0Zqml}$AbT**{xPDHJOGahJS11MQb~@W%GucaxEvsjDLTh5WOk zd-}UD;=0n%BdO556rJe(tzESIONJenFwL zZwS>*(k9FqPaGIK+0kTN)_>mP>LVPea^a2hym@IddUa~bv$TeFRaiL|!4cq&x^gK| zJ~Z{Rnj7v33<9HPdaNcu0Go*I-gSea>j9(ov zEnapkk5Z{!b_KXE*o8N_~b@x`#`PatV3Im4X z0vluv_F!;>wK8Ho#(#7Yly$!@4`%-T!bf6(1@zzO!ou)dh&y#dMG`5v+eJ|cuJD{9 z%xP~F{BjV3D3{j6j=nT%VJ|>@fikfACWr!Bh^QASSqPflHFITLZ7P=R`g15GU=kq4 zpLEQTGvPHz1|1a*q_)2z&`^WR+TMMXJ9S2&p{Yq9bxjGA5PwJ-ICW<}bTVp~NX}u! z(q55Pkz`g0h2rw{qG-7jl)c|CorW|inlM+1SQ{)-Mg*8f$V!d49GKb+UD(rGIX4A6By;anh@f}}Ih;%(qVXYwhb2%$ zf)L4@AjHwdT7UUVt}kVURACBM2!{MoseDRyt<=j zVlkO(!p}D%dgcavv)iX|k&3vJV_No?&?pp(P2)yM!1m09Nm?Xoy;x-=tPOe=o50Np zBEyLAj2J7%k#7_7O2g!;NEY6B7*~+gJ=r(z3afdvkuRB{n`&fL11< zEn>MM1EDVlZ?PFLM>skR7&EcRCcc+ei`RD|JbyOBq57aUqmp4-!SHvLb7*4ko+|k7 zCFpY;=01~GG>zsWGC78WYX{KjAVeGkb2^Y5!%0F7%@BuxY4)u_JgSDpdB}$n8$ktV zDIo>3NYc`W1W>gZR;?hlp$!v)AHyh-q#`6XJsVR0wV!G1yu#~%fhr=`1TsLzl7S(n zOn*p(69Pm<_*TAt>_%er{XP;Ya|_H#1T~5#L<$-6L=6@tl%NZy(_>)YKK8bBZ0$ob z3uLG)LSWD$as}-+=$As7kyMhY&m)vasi`1PP)NAEnK-={a)7D^?Rp2GFKLOkiy@~{ z@Ys6o1O{d3u*1rB8D4vh9+9jslmu#ppMQaK4}<>9%#p?&DnQ1#A)NurdGM~B_mx+c zq1ooZs=Ltx8MbT3XK!zcX0OEynT#=dt_^Bri=|>N8e&5OG$?3pgbjhoJ(EFTO)jev zMlEMzx<`NCBbjxD1M^@A)6evO%uJ^zt96;;l|um{1`TDJTT)964YF&-XT4k(jDHQN zC6Y1^Vu)V0Tla6<6U%%~(?iJV7#tpQtDd+u?`FSr1AV&8Z%v4D$jy@!y7Jv;9lS|m4dMyYj z4>pa@Sb|5hD}n50O2d?;XcvZ|uhZ-GByyI7F0-u$%&#U?HcJUo8}*uA*=uNen?XB8 zsA~)qNI21vv;zcgWfH*(Le?=%3GNakk#a=tj2f^*Yg*BteHIHG+D_$3s(G(VRFI#SDo*ztqq9p@iNpLJXQ|PgMMr9;fP?QR->xKU4q!000000000u000^Q z05UW(000000g;dZ20)P_o~D{pJyGdBPg6{Q0B9NjGy$QYXbk`|Wc4y>rh|Y00iXZ_ zBY#660000085sZoWC;=k6CeoEWHid3s(2BkVGM&zfYVGzsMAJ+N2!tOG7HcoNosNd zBNv|9R97(xA2SjfkA^@bO*FOkb?XocrYE5S5mn6&j3xs-|IR ze^^>|={F^VS_>VvNr2xqipEK(XJMCE7k}8Pb_qPnte<9DbP7@iQZ7>Lr?ib$BJ(Ye zZ=A~NnQH>jo;sXU63VSihpQ%=9U=lCfw^cYCn@9ZVbHr634L)SAZY-OW`vOd!c2w+ z>wfnl=oH_(34evK zg4Ya!2!i7dC;b=1{M65cBro&OGzm#Q30!i_jbBsjxvK_&~ zBrBSOS&&Iv9P>{!mm1Lzl}ijcXn(gp;e7XyXLW6+96=3>T_kG=4JyH-A`8OfU|DOS z3ll($8`Y4q*5H)kUfV@G3h9*excKzwtoBzHBtpHA=b2SDt|gHZEH#hAYiFpz*Iq^R znZ8qdS~;+(V-w@48XM9TozG!Ms8_O8y9toN&FE#s%!^7zrF~ntt9s+Rhkv2hTC`wm zGYtfWY%5W!QbF{5zsJ{QHllbHIB*K_1L0kdvsZOWPAR7A+di@!<`%;1u}isGX~SxgmiNSnfWM6Pzvr*i4^THYNHKG3wV^L0V% zzCH+}@`{3~c2;Rkdq*i!lYeg5RIpPt?0TixpMjCCV+x}OU_7+Uo}TustviTkddj1b zbP*lc>ZcVdC(53-Q%RBF=-9y|iuo-Ojavd5=ahfH6uKWKzji);Pz&S0$HMfxt0)#uQ9KN<>+Zqd8g^j zsF9#ZgHnG1!6IkvHAn^>%LdY0UzKSTAoKP&pIr{kQK%?tQh!I=Q$l3K5(bWL_H*r_ zlT^k=a}FIQ2^MJ;i$O5JUVfxa7ou{Pz31=aqJ=X?D*-Bo%Bdp~Oe16^M%)fea_nzw zfw?W$M#w@?9Va){-=?>73k*nU8X!j8b2KDowH%lAwARi$f}L_Zd(|Q+9nsEb1`yGJ zkitWfupz++WPi<&Xf(L9Unza&45@(UG+`@HNUSE+uZxu6Wb>@Sj&ST&0yc>nRr#H8 zU**7k0;#BkTvD}9wXAin0$4ihF%bx(#;S^z+(Lmsq+D+rGEN7!WFku8BUTEgQc9t( zNpZXk(4Iss_VRzAuxv%3Br^U8nhKVJnglLAdhb3?_kYFTiGgc&&_K}GmF+;pJ@P#M zU4M%hY{BnS0mxo$7+EStfSE(t&uStkUwt|lxDvA?1l0yO2E(wK!)RG4Jmo7k&5cXK z_j-EbG-Qs(uFE4inRrWr$rU&r5rYMQ(k|fqvZ?Y}Bn_UcJbhFMpj0TgKzQuBe6X^Z zSoDG2jz7PzG>B>|F{soR3sBGACzFl_;E27O>aqz5P|=hV?4yqG8&AVYg4&zd8c*C@Cd zLeVt|YZd7b9mKo2zO-b)9k6s5FlSqkO?n-gFn?YSDDd45hra=}9A*}@AFq*HHij?5(sNTCPWGu^F$35ODRAbCeveJ--6ru z5#R8`HjBPcFhXF^B60=ow&<5}OvtiHSnbH?5$kG56ciFKFeXkgMf~6^0lQw1@r&DH zZKAN#v4CtnmVyH_1XRb)b(vs$tsbGQFn^Q;YK5P5bPt*TR%S@$4wWEdT*zl|InNX; z=RM_?1;};!@GCAzfsD&CBR4NER%Y9y3xl-_HZKMGV@2s!i^EJvU~q*E4bXwGIL~Cz zR3?{tsUt&K)n6mE@e$Cvf`R#Q1ZnYlf8r)nkFR}m(3OJ`A_fg*np;v!9VXc|>3LZyc~2MBFPDx1BnaN)S)oLdyyf7O0@47{2{gT` z7$V?;fb(eF^@t>W*um(?7NM+hQ6S|;M$imVxs*#3DGOM|FekW3l11qgzA}} + +\if{html}{\out{
}}\preformatted{## using C compiler: ‘gcc (Ubuntu 11.4.0-1ubuntu1~22.04) 11.4.0’ +}\if{html}{\out{
}} \itemize{ \item Inside a \code{rxode2("")} string statement: }\if{html}{\out{ @@ -247,6 +250,9 @@ mod <- rxode2(\{ d/dt(centr) <- F*KA*depot - CL*C2 - Q*C2 + Q*C3; ") }\if{html}{\out{}} + +\if{html}{\out{
}}\preformatted{## using C compiler: ‘gcc (Ubuntu 11.4.0-1ubuntu1~22.04) 11.4.0’ +}\if{html}{\out{
}} \itemize{ \item In a file name to be loaded by rxode2: }\if{html}{\out{ @@ -325,7 +331,9 @@ compilation model. \if{html}{\out{
}}\preformatted{mod$simulationModel }\if{html}{\out{
}} -\if{html}{\out{
}}\preformatted{## rxode2 2.0.14.9000 model named rx_8223e497c83db9e334c52254bd575c98 model (ready). +\if{html}{\out{
}}\preformatted{## using C compiler: ‘gcc (Ubuntu 11.4.0-1ubuntu1~22.04) 11.4.0’ + +## rxode2 2.0.14.9000 model named rx_4d7e23c27b311c0b8fa7436caae3124f model (ready). ## x$state: depot, center ## x$stateExtra: cp ## x$params: tka, tcl, tv, add.sd, eta.ka, eta.cl, eta.v, rxerr.cp @@ -336,7 +344,9 @@ compilation model. mod$simulationIniModel }\if{html}{\out{
}} -\if{html}{\out{
}}\preformatted{## rxode2 2.0.14.9000 model named rx_182c47efea379394bbab84d957305170 model (ready). +\if{html}{\out{
}}\preformatted{## using C compiler: ‘gcc (Ubuntu 11.4.0-1ubuntu1~22.04) 11.4.0’ + +## rxode2 2.0.14.9000 model named rx_175d15ed553ae1eccaf047d565b24f55 model (ready). ## x$state: depot, center ## x$stateExtra: cp ## x$params: tka, tcl, tv, add.sd, eta.ka, eta.cl, eta.v, rxerr.cp