newRPL: Making RPL more readable

[compsystems]

Is very important in some way, control of the scope of the variables

ORIGINAL USER RPL HP48

PHP Code:

«
  @ Definition and declaration of LOCAL VARS
  « * SQRT  »
  « + 2 / »
  -> rms avg
  « @ Initiates the scope of local variables: rms, avg
    @ MAIN PROGRAM
    2 4 avg
    2 4 rms
  » @ Finish the scope of local variables, rms, avg
  avg @ returns 'avg' : OK Variable not defined
» 


NEW RPL
I: full scope

PHP Code:

«
  @ Definition and Declaration of LOCAL VARS
  LOCAL 'rms' « * v  » 
  LOCAL 'avg' « + 2 / » 
  @ Initiates the scope of local variables: rms, avg
    @ MAIN PROGRAM
    2 4 avg
    2 4 rms
» @ Finish the scope of local variables, rms, avg 


II limited scope, individual declaration
NEW RPL

PHP Code:

«
  @ Declaration of LOCAL VARS
  LOCAL 'rms'
  LOCAL 'avg'
  « @ Initiates the scope of local variables: rms, avg
    @ MAIN PROGRAM
    @ Definition
    « * SQRT  » 'rms' STO
    « + 2 / » 'avg' STO
    2 4 avg
    2 4 rms
  » @ Finish the scope of local variables, rms, avg
  avg @ returns 'avg' : OK Variable not defined
» 


III limited scope, group declaration
NEW RPL (LOCALS CMD) for n vars

PHP Code:

«
  @ Declaration of LOCAL VARS
  LOCALS 'rms' 'avg'
  « @ Initiates the scope of local variables: rms, avg
    @ MAIN PROGRAM
    @ Definition
    « * SQRT  » 'rms' STO
    « + 2 / » 'avg' STO
    2 4 avg
    2 4 rms
  » @ Finish the scope of local variables, rms, avg
  avg @ returns 'avg' : OK Variable not defined
»