package Ġspace . k science . k math . ast Ċ Ċ import Ġspace . k science . k math . expressions . invoke Ċ import Ġspace . k science . k math . operations . Real Field Ċ Ċ fun Ġmain () Ġ{ ĊĠĠĠ Ġval Ġexpr Ġ= ĠReal Field . mst In Field Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġx Ġ= Ġbind Symbol (" x ") ĊĠĠĠĠĠĠĠ Ġx Ġ* Ġ 2 . 0 Ġ+ Ġ 2 . 0 Ġ/ Ġx Ġ- Ġ 1 6 . 0 ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġrepeat ( 1 0 0 0 0 0 0 0 ){ ĊĠĠĠĠĠĠĠ Ġexpr . invoke (" x " Ġto Ġ 1 . 0 ) ĊĠĠĠ Ġ} Ċ }