method set_env     r = env     <- r