SCM Repository
Diff of /sml/trunk/src/eXene/examples/nbody/display.sml
Parent Directory
| 
Revision Log
| 
Patch
| revision 845, Thu Jun 21 16:25:49 2001 UTC | revision 846, Mon Jun 25 16:06:46 2001 UTC | |
|---|---|---|
| # | Line 14 | Line 14 |
| 14 | val contr_size = 12 | val contr_size = 12 |
| 15 | ||
| 16 | val G = 6.67e~8 | val G = 6.67e~8 |
| 17 | val dt = (* 500.0 *) 2000.0 | val dt = 500.0 (* 2000.0 *) |
| 18 | val max = 7.80e13 * 2.1 | val max = 7.80e13 * 2.1 |
| 19 | ||
| 20 | val N = (* 30 *) 15 | val N = 30 (* 15 *) |
| 21 | ||
| 22 | fun spacer n = Box.Glue { nat = n, min = n, max = SOME n } | fun spacer n = Box.Glue { nat = n, min = n, max = SOME n } |
| 23 | fun rubber n = Box.Glue { nat = n, min = 1, max = NONE } | fun rubber n = Box.Glue { nat = n, min = 1, max = NONE } |
|
||||||||
| root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
| Powered by ViewVC 1.0.0 |
