# Definitional proc to organize widgets for parameters.
proc init_gui { IPINST } {
  ipgui::add_param $IPINST -name "Component_Name"
  #Adding Page
  set Page_0 [ipgui::add_page $IPINST -name "Page 0"]
  ipgui::add_param $IPINST -name "NEWWIDTH" -parent ${Page_0}
  ipgui::add_param $IPINST -name "OLDWIDTH" -parent ${Page_0}


}

proc update_PARAM_VALUE.NEWWIDTH { PARAM_VALUE.NEWWIDTH } {
	# Procedure called to update NEWWIDTH when any of the dependent parameters in the arguments change
}

proc validate_PARAM_VALUE.NEWWIDTH { PARAM_VALUE.NEWWIDTH } {
	# Procedure called to validate NEWWIDTH
	return true
}

proc update_PARAM_VALUE.OLDWIDTH { PARAM_VALUE.OLDWIDTH } {
	# Procedure called to update OLDWIDTH when any of the dependent parameters in the arguments change
}

proc validate_PARAM_VALUE.OLDWIDTH { PARAM_VALUE.OLDWIDTH } {
	# Procedure called to validate OLDWIDTH
	return true
}


proc update_MODELPARAM_VALUE.OLDWIDTH { MODELPARAM_VALUE.OLDWIDTH PARAM_VALUE.OLDWIDTH } {
	# Procedure called to set VHDL generic/Verilog parameter value(s) based on TCL parameter value
	set_property value [get_property value ${PARAM_VALUE.OLDWIDTH}] ${MODELPARAM_VALUE.OLDWIDTH}
}

proc update_MODELPARAM_VALUE.NEWWIDTH { MODELPARAM_VALUE.NEWWIDTH PARAM_VALUE.NEWWIDTH } {
	# Procedure called to set VHDL generic/Verilog parameter value(s) based on TCL parameter value
	set_property value [get_property value ${PARAM_VALUE.NEWWIDTH}] ${MODELPARAM_VALUE.NEWWIDTH}
}

