#include "impstrings.h"
#define unless(cond) if (!(cond))
void TOPLEV(void)
{
  double LR1;
  int I;
  int I1 = 1;
  int I2 = 2;
  int I3 = 3;

  if (I2 == I3) I = I1;         // i = i1 %if i2 = i3
  while (I2 == I3) I = I1;      // i = i1 %while i2 = i3
  do
    I = I1;
  while (!(I2 == I3));          // i = i1 %until i2 = i3
  unless (I2 == I3) I = I1;     // i = i1 %unless i2 = i3
  for (I2 = I3; I2 <= I1; I2 += 1) I = I1;         // i = i1 %for i2 = i3, 1, i1

  if (I2 == I3) {
    I = I1;
    I1 = I2;
  }                             // i = i1 %and i1 = i2 %if i2 = i3
  while (I2 == I3) {
    I = I1;
    I1 = I2;
  }                             // i = i1 %and i1 = i2 %while i2 = i3
  do {
    I = I1;
    I1 = I2;
  } while (!(I2 == I3));        // i = i1 %and i1 = i2 %until i2 = i3
  unless (I2 == I3) {
    I = I1;
    I1 = I2;
  }                             // i = i1 %and i1 = i2 %unless i2 = i3
  for (I2 = I3; I2 <= I1; I2 += 1) {
    I = I1;
    I1 = I2;
  }                             // i = i1 %and i1 = i2 %for i2 = i3, 1, i1
}