/* simple declaration...*/ int ALINE;

/* simple declaration...*/ int BLINE;

/* simple declaration...*/ int CLINE;

/* simple declaration...*/ int DLINE;

/* simple declaration...*/ int ELINE;

/* simple declaration...*/ int FLINE;

/* simple declaration...*/ int GPRIMELINE;

/* simple declaration...*/ int HLINE;

/* array...*/ float SPECTRALLINE[(8)-(1)+1];

/* simple declaration...*/ int CURRENTSURFACES;

/* array...*/ float TESTCASE[(4)-(1)+1][(4)-( 1)+1];

/* simple declaration...*/ int CURVATURERADIUS;

/* simple declaration...*/ int INDEXOFREFRACTION;

/* simple declaration...*/ int DISPERSION;

/* simple declaration...*/ int EDGETHICKNESS;

/* simple declaration...*/ float CLEARAPERTURE;

/* simple declaration...*/ float ABERRLSPHER;

/* simple declaration...*/ float ABERROSC;

/* simple declaration...*/ float ABERRLCHROM;

/* simple declaration...*/ float MAXLSPHER;

/* simple declaration...*/ float MAXOSC;

/* simple declaration...*/ float MAXLCHROM;

/* simple declaration...*/ float RADIUSOFCURVATURE;

/* simple declaration...*/ float OBJECTDISTANCE;

/* simple declaration...*/ float RAYHEIGHT;

/* simple declaration...*/ float AXISSLOPEANGLE;

/* simple declaration...*/ float FROMINDEX;

/* simple declaration...*/ float TOINDEX;

/* simple declaration...*/ int NUMBEROFITERATIONS;

/* simple declaration...*/ int ITERATION;

/* simple declaration...*/ int PARAXIAL;

/* simple declaration...*/ int MARGINALRAY;

/* simple declaration...*/ int PARAXIALRAY;

/* simple declaration...*/ int ODFIELD;

/* simple declaration...*/ int SAFIELD;

/* array...*/ float ODSA[(2)-(1)+1][(2)-( 1)+1];

/* simple declaration...*/ float ODCLINE;

/* simple declaration...*/ float ODFLINE;

/* simple declaration...*/ float FRACTION;

/* routine...*/ auto void TRANSITSURFACE (/*params*/) /*routine...*/  {
  // has_body - to be filled in...
}

/* simple declaration...*/ float IANG;

/* simple declaration...*/ float RANG;

/* simple declaration...*/ float IANGSIN;

/* simple declaration...*/ float RANGSIN;

/* simple declaration...*/ float OLDAXISSLOPEANGLE;

/* simple declaration...*/ float SAGITTA;

/* simple declaration...*/ int I;