Parent Directory | Revision Log | Patch
revision 1.2 by mocchiut, Wed Nov 22 08:31:11 2006 UTC | revision 1.3 by mocchiut, Fri Dec 12 16:18:21 2008 UTC | |
---|---|---|
# | Line 23 C--------------------------------------- | Line 23 C--------------------------------------- |
23 | COMMON / SHIFT / SHIFT | COMMON / SHIFT / SHIFT |
24 | SAVE / SHIFT / | SAVE / SHIFT / |
25 | ||
26 | MILLIM = 0 | |
27 | ||
28 | AAA = AA + SHIFT | AAA = AA + SHIFT |
29 | II = LL - 1 | II = LL - 1 |
30 | K1 = INT(II / 32) | K1 = INT(II / 32) |
|
ViewVC Help | |
Powered by ViewVC 1.1.23 |