Mercurial > projects > dstress
view run/c/cfloat_02_A.d @ 560:dc5ce97dab82
Nick <Nick_member@pathlink.com>
2005-05-25
news:d72fan$60m$1@digitaldaemon.com
author | thomask |
---|---|
date | Wed, 01 Jun 2005 13:02:35 +0000 |
parents | |
children | 5511f9277078 |
line wrap: on
line source
// $HeadURL$ // $Date$ // $Author$ // @author@ Nick <Nick_member@pathlink.com> // @date@ 2005-05-25 // @uri@ news:d72fan$60m$1@digitaldaemon.com module dstress.run.c.cfloat_02_A; int main(){ static cfloat[] params = [1,3,5]; cfloat[] sums = new cfloat[3]; sums[] = 0; foreach(cfloat d; params){ cfloat prod = d; for(int i; i<2; i++){ sums[i] += prod; prod *= d; } sums[2] += prod; } assert(sums[0].re==9); assert(sums[0].im==0); assert(sums[1].re==35); assert(sums[1].im==0); assert(sums[2].re==153); assert(sums[2].im==0); return 0; }