anchor.diff:      lists:member(BlockTypeStr, lblx_types:block_type_names()).
   
   
  +%%
  +%% Get the list of block values for all of the blocks currently running
  +%%
  +block_values() ->
  +    block_values(block_names(), []).
  +    
  + block_values([], BlockValuesList) -> BlockValuesList;
  + 
  + block_values(BlockNames, BlockValuesList) ->
  +    [BlockName | RemainingBlockNames] = BlockNames,
  +    BlockValues = block_server:get_values(BlockName),
  +    block_values(RemainingBlockNames, [BlockValues | BlockValuesList]).
  +
   %% 
   %% Get the block names of currently running processes
   %%
  
positive.code: 
  
  % Process the load blocks command
  ui_load_blocks(_Params) ->
      io:format("Not Implemented~n").
  
  
  % Process the save blocks command
  ui_save_blocks(_Params) ->
      io:format("Not Implemented~n").
  
  
  % Process the help command
  
negative.code:             "enable"    -> ui_enable_block(Params);
              "freeze"    -> ui_freeze_block(Params);
              "thaw"      -> ui_thaw_block(Params);
              "get"       -> ui_get_values(Params);
              "set"       -> ui_set_value(Params);
              "link"      -> ui_link_blocks(Params);
              "status"    -> ui_status(Params);
  