------- Comment #4 from pinskia at gcc dot gnu dot org  2008-09-04 06:53 -------
Reduced enough for me (40 lines):
extern "C" {
  extern double exp (double __x) throw ();
  extern double log (double __x) throw ();
  extern double sqrt (double __x) throw ();
}
int  hic2_full()
{
  double zcx, zs, latl, FCxb, FCa_ck;
  double FCa, FFx, Dv_r;
  double Dv_j1, Dv_e;
  double Cjei, DFb, DIOY, vds_t, abet_t, ajep_t;
  double v_e, d00_logE0 ;
sqrt(FFx); sqrt(FFx); sqrt(FFx); sqrt(FFx);
sqrt(FFx); sqrt(FFx); sqrt(FFx); sqrt(FFx);
sqrt(FFx); sqrt(FFx); sqrt(FFx);
sqrt(FCa); sqrt(FCa); sqrt(FCa); sqrt(FCa);
sqrt(FCa); sqrt(FCa); sqrt(FCa); sqrt(FCa);
sqrt(FCa);
log(FCxb);
exp(FCa_ck); exp(FCa_ck); exp(FCa_ck);
exp(FCa_ck); exp(FCa_ck); exp(FCa_ck);
exp(FCa_ck); exp(FCa_ck); exp(FCa_ck);
log(latl);
exp(DIOY);
 log(ajep_t);
 sqrt(v_e);  sqrt(v_e);  sqrt(v_e);
 exp(abet_t);
 log(Cjei);
 exp((d00_logE0)/zcx);
 exp((d00_logE0)/zs);
exp(Dv_e); exp(Dv_e); exp(Dv_e); exp(Dv_e);
exp(Dv_e);
exp(Dv_r); exp(Dv_r); exp(Dv_r); exp(Dv_r);
exp(Dv_r); exp(Dv_r);
log(1.0-(Dv_j1/vds_t));
exp(DFb); exp(DFb); exp(DFb); exp(DFb);
exp(DFb); exp(DFb); exp(DFb); exp(DFb);
exp(DFb); exp(DFb); exp(DFb); exp(DFb);
exp(DFb);
}


-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |davidxl at gcc dot gnu dot
                   |                            |org
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2008-09-04 06:53:32
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37353

Reply via email to