nbody.Body.constructor
Body constructor(float x_, float y_, float mass_, float radius_, float ax_, float ay_, int index, Semaphore sem)
Vars:
int index,
array[Body] TEMP$3,
Semaphore sem,
float mass_,
float radius_,
float x_,
int TEMP$2,
float TEMP$0,
float y_,
float ay_,
float TEMP$1,
float ax_.

| Queue | Object |
| q0 | ARG |
| q1 | TEMP |
| q2 | TEMP2 |
| q3 | TEMP3 |
| q4 | TEMP4 |
| q5 | LOADADDR |
| q6 | LOADDATA |
| q7 | STOREADDR |
| q8 | STOREDATA |
| q9 | THIS |
| q10 | RETURN |
| q11 | x_ |
| q12 | y_ |
| q13 | mass_ |
| q14 | radius_ |
| q15 | ax_ |
| q16 | ay_ |
| q17 | index |
| q18 | sem |
| q19 | TEMP$0 |
| q20 | TEMP$1 |
| q21 | TEMP$2 |
| q22 | TEMP$3 |
- constructor_top63
-
(ASSIGN (ENQUEUE NO TEMP$0) (TOFLOAT 0))
(ASSIGN (ENQUEUE NO TEMP$1) (MINUS (DEQUEUE NO TEMP$0) 9.7))
(ASSIGN (IVARSET (THIS) G) (DEQUEUE NO TEMP$1))
(ASSIGN (IVARSET (THIS) NUMPLANETS) 32)
(ASSIGN (IVARSET (THIS) sticky) false)
(ASSIGN (IVARSET (THIS) x) (DEQUEUE NO x_))
(ASSIGN (IVARSET (THIS) y) (DEQUEUE NO y_))
(ASSIGN (IVARSET (THIS) mass) (DEQUEUE NO mass_))
(ASSIGN (IVARSET (THIS) radius) (DEQUEUE NO radius_))
(ASSIGN (IVARSET (THIS) ax) (DEQUEUE NO ax_))
(ASSIGN (IVARSET (THIS) ay) (DEQUEUE NO ay_))
(ASSIGN (ENQUEUE NO TEMP$2) (IVARREF (THIS) NUMPLANETS))
(ASSIGN (ENQUEUE NO TEMP$3) (NEWARRAY People.ObjectType:Body (DEQUEUE NO TEMP$2)))
(ASSIGN (IVARSET (THIS) planets) (DEQUEUE NO TEMP$3))
(ASSIGN (IVARSET (THIS) myIndex) (DEQUEUE NO index))
(ASSIGN (IVARSET (THIS) mySem) (DEQUEUE NO sem))
(RETURN (THIS))