Mercurial > projects > dstress
view run/c/cdouble_06.d @ 1489:b8c0195059d9
changed nntp: URLs to http: URLs
author | thomask |
---|---|
date | Mon, 09 Apr 2007 13:47:01 +0000 |
parents | 7e8e5013a030 |
children |
line wrap: on
line source
// $HeadURL$ // $Date$ // $Author$ // @author@ Tiago Gasiba <tiago.gasiba@gmail.com> // @date@ 2005-11-24 // @uri@ http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=5643 module dstress.run.c.cdouble_06; int main( ){ cdouble[] array; array.length = 3; array[0] = 1.0 + 0.0i; array[1] = 0.0 + 1.0i; array[2] = 1.0 + 1.0i; for(int i = 0; i < array.length; i++ ){ array[i] += -1.0i * array[i]; } if(array[0] != 1.0 - 1.0i){ assert(0); } if(array[1] != 1.0 + 1.0i){ assert(0); } if(array[2] != 2.0 + 0.0i){ assert(0); } return 0; }