let compose = ((id id) (id id) id