Mercurial > projects > dstress
view run/d/double_25_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 | b8c0195059d9 |
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.d.double_25_A; int main(){ static double[] params = [1,3,5]; double[] sums = new double[3]; sums[] = 0; foreach(double d; params){ double prod = d; for(int i; i<2; i++){ sums[i] += prod; prod *= d; } sums[2] += prod; } assert(sums[0]==9); assert(sums[1]==35); assert(sums[2]==153); return 0; }