DOCUMENTATION

SYNOPSIS

PERL PROGRAM NAME: wipe 
AUTHOR: Juan Lorenzo
DATE:  July 3 2017 

DESCRIPTION: 
Version:0.1 
Package used for scrubbing gui

USE

NOTES

Examples

CHANGES and their DATES

anonymous reference to common variable

In $param->{_length}, length = max_index + 1 (see L_SU_global constants)

sub all_check_buttons

print("self is $self\n");
print("\nprevious final entry $entries->{_prev_final_entry_num}\n");
     print("$i on or off: red \n");
print("wipe: ref butt are @$ref_button refvar is @$ref_variable\n\n");
print("\nmax entry $all\n");
print(" 1. count is $i\n");
print(" 2. count is $i\n");
print("all is $all\n");
print("wipe: ref butt are @$ref_button[$i]\n
             refvar is @$ref_variable[$i]\n\n");
print(" 1. count is $i\n");

sub neutral_range

for neutral color

sub range

for colored flows

sub set_range

sub set_all

sub labels

print("self is $self labels are $ref_labels_w\n\n");
 print("delete labels $i ");

sub values

   print("self is $self values are $ref_values_w\n\n");
   print("wipe  final: $entries->{_final_entry_num}\n");
   print("  prev final: $entries->{_prev_final_entry_num}\n");
   print("  first: $entries->{_first_entry_num}\n");
   print("wipe   max $entries->{_max_entry_num}\n");
   print("max final entry num $all\n\n");
    $LSU->{_ref_labels_w} = $create->labelsc(\@blank_choices,
	\$parameter_names_frame);
     
     
	solve mystery memory leak
    $entries->{_check_buttons_settings_aref} = $temp;
	print("wipe,neutral_range,length of previous selected sueprflow = $entries->{_length}\n");
	print("wipe,neutral_range,check_buttons_settings_aref=--@{$entries->{_check_buttons_settings_aref}}--\n");

	print("wipe,values, _values_w_aref: @{$entries->{_values_w_aref}} \n");
	print("wipe,values, first_idx: $first_idx, length: $length, _values_w_aref: @{$entries->{_values_w_aref}} \n");	
	

sub check_buttons

print("self is $self\n");
print("\nprevious final entry $entries->{_prev_final_entry_num}\n");
     print("$i on or off: red \n");
print("wipe: ref butt are @$ref_button refvar is @$ref_variable\n\n");
print("\nmax entry $all\n");
print(" 1. count is $i\n");
print(" 2. count is $i\n");
print("all is $all\n");
print("wipe: ref butt are @$ref_button[$i]\n
             refvar is @$ref_variable[$i]\n\n");
print(" 1. count is $i\n");