#include <perms.h>
void FRED(float X, float Y) {
  _imp_enter();
  float Z;
  if (X > 0 && Y > 0) {
    Z = SQRT(X + Y);

  } else {
    _imp_monitor(0);
  }
  _imp_leave();
}