Render template

render_template_Rmd

---
output: pdf_document
params:
  model: ""
  project: ""
---



```{r,echo=FALSE}
library(mrgsolve)
library(knitr)
opts_chunk$set(comment='',echo=FALSE)
mod <- mread(params$model,params$project,compile=FALSE)
house <- mrgsolve:::house()
x <- modelparse(house@code,drop_blank=FALSE)
```

# PROBLEM
`r knit(text=x$PROB)`




# Model details
```{r}
mrgsolve:::details(mod)
```

## Parameters
```{r}
param(mod)
```

## Compartments
```{r}
init(mod)
```

# Model code

## `$MAIN`
```{r}
blocks(mod,MAIN)
```

## `$ODE`
```{r}
blocks(mod,ODE)
```

## `$TABLE`
```{r}
blocks(mod,TABLE)
```