Function parse 

pub fn parse<T>(source: &str) -> Result<Program<T>, Error>
where
    T: TypeSet,