| immutable class F_COMPLEX < $F_NUMBER{F_COMPLEX}, $F_SCALAR |
|---|
| **** | FORTRAN COMPLEX type (built in type) |
| $F_SCALAR | $IS_EQ | $STR | $F_NUMBER{_} | $NIL | $IS_NIL |
| cpx:CPX |
|---|
| **** | A Sather CPX version of self |
| create(x:CPX):SAME |
|---|
| create(re:FLT, im:FLT):SAME |
|---|
| create(fc:F_COMPLEX):SAME |
|---|
| create(re:F_REAL, im:F_REAL):SAME |
|---|
| div(c:SAME):SAME |
|---|
| **** | The ratio of self and `c'. |
| im(x:F_REAL) |
|---|
| im:F_REAL |
|---|
| is_eq(c: SAME): BOOL |
|---|
| is_eq(arg: $OB): BOOL .. Included as is_eq |
|---|
| is_nil:BOOL |
|---|
| minus(c:SAME):SAME |
|---|
| **** | The difference of self and `c'. |
| nil:SAME |
|---|
| **** | let Sather handle this (we are confused by the philosophical impilations of nil vs void vs unitialized vs zero |
| plus(c:SAME):SAME |
|---|
| re(x:F_REAL) |
|---|
| re:F_REAL |
|---|
| str:STR |
|---|
| times(c:SAME):SAME |
|---|
| zero:SAME |
|---|