// Simple expression statements x = 15.9 + 82*i; y = 17.3 -14.9*i; z = x+y; xr = real(x); xi = imag(x); xc = conj(x); norm = sqrt(x*conj(x)); dump x, xr, xi, xc, norm; print "x = " + x + ", y = " + y + ", x + y = "+ (x + y) + "\n"; dump x, y, z; test1 = x/x; test2 = (x*(y/x))/y; dump test1, test2; k = 0; for (;;) { if (k++ > 6) break; dump k; } x += y; difference = x - y; product = x*y; quotient = x/y; power = x**-3; dump x, y, difference, product, quotient, power; pi = 3.1415927; log1 = log(power); power1 = exp(log1); log2 = -3*log(x); power2 = exp(log2); dump log1, log2; l1ml2 = log1 - log2; l1ml2s2p = l1ml2/(2*pi); dump l1ml2, l1ml2s2p; dump power1, power2; xyz -= 47; uvw >>= 2; // Comparisons xLTz = 0; xGTz = 0; xLEz = 0; xGEz = 0; xEQz = 0; xNEz = 0; if (x == z) xEQz = 1; if (x != z) xNEz = 1; if (x == y) xEQy = 1; else xEQy = -1; if (x != y) xNEy = 1; else xNEy = -1; if (product == quotient) t2y = 1; else t2y = -1; if (product == quotient || real(x) > real(y)) t2z = 1; else t2z = -1; t2xa = -1; if (real(x) > real(y)) t2xa = 1; t2ya = -1; if (product == quotient) t2ya = 1; t2za = -1; if (product == quotient || real(x) > real(y)) t2za = 1; t2zb = -1; if (imag(x) > imag(y) || product == quotient) t2zb = 1; t2zc = product == quotient || imag(x) > imag(y); t2zd = imag(x) > imag(y) || product == quotient; // do while loop tenFactorial = 1; k = 0; do tenFactorial *= ++k; while (k < 10); // while loops sum = 0; loopIndex = 0; while (1) { sum += x; if (loopIndex >10) break; loopIndex++; } // for loops for (mean = 0, sumOfSquares = 0, index = 0; index < 10; index++) { mean += index; sumOfSquares += index**2; } indexSummed = mean; mean /=index; sumOfSquares -= index*mean**2; sigma = sqrt(sumOfSquares/index);