|
|
| version 1.84.4.6, 2005/08/26 12:35:55 | version 1.102, 2005/11/22 11:12:40 |
|---|---|
| Line 1 | Line 1 |
| $d[^date::create(2005;01;01+7)] | ^for[i](1;200){ |
| $d.week | <hr> |
| $original[^for[j](1;$i){$j}] | |
| $original | |
| <br> | |
| $encoded[^string:base64[$original]] | |
| $encoded | |
| <br> | |
| $decoded[^encoded.base64[]] | |
| $decoded | |
| ^if($decoded ne $original){^throw[bug;here]} | |
| } |