dlnfgqre.cc

Gambit 是一个游戏库理论软件

//
// $Source: /home/gambit/CVS/gambit/sources/gui/dlnfgqre.cc,v $
// $Date: 2002/09/09 23:34:44 $
// $Revision: 1.5.2.1 $
//
// DESCRIPTION:
// Dialog for computing quantal response equilibria
//
// This file is part of Gambit
// Copyright (c) 2002, The Gambit Project
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//

#include "wx/wxprec.h"
#ifndef WX_PRECOMP
#include "wx/wx.h"
#endif  // WX_PRECOMP
#include "nash/nfgqre.h"
#include "dlnfgqre.h"

const int idRADIOBOX_SOLVEUSING = 2000;

BEGIN_EVENT_TABLE(dialogNfgQre, wxDialog)
  EVT_RADIOBOX(idRADIOBOX_SOLVEUSING, dialogNfgQre::OnSolveUsing)
END_EVENT_TABLE()

dialogNfgQre::dialogNfgQre(wxWindow *p_parent, const NFSupport &p_support)
  : wxDialog(p_parent, -1, "Compute quantal response equilibria")
{
  SetAutoLayout(true);

  wxBoxSizer *topSizer = new wxBoxSizer(wxVERTICAL);

  wxString solveChoices[] = { "Trace principal branch",
			      "Use grid search" };
  m_solveUsing = new wxRadioBox(this, idRADIOBOX_SOLVEUSING, "Method",
				wxDefaultPosition, wxDefaultSize,
				2, solveChoices, 1, wxRA_SPECIFY_ROWS);
  m_solveUsing->SetSelection(0);
  topSizer->Add(m_solveUsing, 0, wxALL | wxCENTER, 5);

  wxStaticBox *gridBox = new wxStaticBox(this, wxID_STATIC, 
					 "Grid search parameters");
  wxStaticBoxSizer *gridSizer = new wxStaticBoxSizer(gridBox, wxVERTICAL);

  wxStaticBox *lambdaBox = new wxStaticBox(this, wxID_STATIC,
					   "Search over lambda");
  wxStaticBoxSizer *lambdaSizer = new wxStaticBoxSizer(lambdaBox, wxVERTICAL);

  wxBoxSizer *startLambdaSizer = new wxBoxSizer(wxHORIZONTAL);
  startLambdaSizer->Add(new wxStaticText(this, wxID_STATIC, "Start at lambda"),
			0, wxALL | wxCENTER, 5);
  m_startLambda = new wxTextCtrl(this, -1, ".01");
  m_startLambda->Enable(false);
  startLambdaSizer->Add(m_startLambda, 0, wxALL | wxCENTER, 5);
  lambdaSizer->Add(startLambdaSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  wxBoxSizer *stopLambdaSizer = new wxBoxSizer(wxHORIZONTAL);
  stopLambdaSizer->Add(new wxStaticText(this, wxID_STATIC, "Stop at lambda"),
		       0, wxALL | wxCENTER, 5);
  m_stopLambda = new wxTextCtrl(this, -1, "3");
  m_stopLambda->Enable(false);
  stopLambdaSizer->Add(m_stopLambda, 0, wxALL | wxCENTER, 5);
  lambdaSizer->Add(stopLambdaSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  wxBoxSizer *stepLambdaSizer = new wxBoxSizer(wxHORIZONTAL);
  stepLambdaSizer->Add(new wxStaticText(this, wxID_STATIC, "Increment by"),
		       0, wxALL | wxCENTER, 5);
  m_stepLambda = new wxTextCtrl(this, -1, ".1");
  m_stepLambda->Enable(false);
  stepLambdaSizer->Add(m_stepLambda, 0, wxALL | wxCENTER, 5);
  lambdaSizer->Add(stepLambdaSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  gridSizer->Add(lambdaSizer, 0, wxALL | wxCENTER, 5);

  wxStaticBox *coarseBox = new wxStaticBox(this, wxID_STATIC,
					   "Settings for coarse grid");
  wxStaticBoxSizer *coarseSizer = new wxStaticBoxSizer(coarseBox, wxVERTICAL);

  wxBoxSizer *coarseGridSizer = new wxBoxSizer(wxHORIZONTAL);
  coarseGridSizer->Add(new wxStaticText(this, wxID_STATIC, "Grid size"),
			0, wxALL | wxCENTER, 5);
  m_del1 = new wxTextCtrl(this, -1, ".01");
  m_del1->Enable(false);
  coarseGridSizer->Add(m_del1, 0, wxALL | wxCENTER, 5);
  coarseSizer->Add(coarseGridSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  wxBoxSizer *coarseTolSizer = new wxBoxSizer(wxHORIZONTAL);
  coarseTolSizer->Add(new wxStaticText(this, wxID_STATIC, "Tolerance"),
		      0, wxALL | wxCENTER, 5);
  m_tol1 = new wxTextCtrl(this, -1, ".01");
  m_tol1->Enable(false);
  coarseTolSizer->Add(m_tol1, 0, wxALL | wxCENTER, 5);
  coarseSizer->Add(coarseTolSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  gridSizer->Add(coarseSizer, 0, wxALL | wxCENTER, 5);

  wxStaticBox *fineBox = new wxStaticBox(this, wxID_STATIC,
					 "Settings for fine grid");
  wxStaticBoxSizer *fineSizer = new wxStaticBoxSizer(fineBox, wxVERTICAL);

  wxBoxSizer *fineGridSizer = new wxBoxSizer(wxHORIZONTAL);
  fineGridSizer->Add(new wxStaticText(this, wxID_STATIC, "Grid size"),
		     0, wxALL | wxCENTER, 5);
  m_del2 = new wxTextCtrl(this, -1, ".0001");
  m_del2->Enable(false);
  fineGridSizer->Add(m_del2, 0, wxALL | wxCENTER, 5);
  fineSizer->Add(fineGridSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  wxBoxSizer *fineTolSizer = new wxBoxSizer(wxHORIZONTAL);
  fineTolSizer->Add(new wxStaticText(this, wxID_STATIC, "Tolerance"),
		    0, wxALL | wxCENTER, 5);
  m_tol2 = new wxTextCtrl(this, -1, ".0001");
  m_tol2->Enable(false);
  fineTolSizer->Add(m_tol2, 0, wxALL | wxCENTER, 5);
  fineSizer->Add(fineTolSizer, 0, wxLEFT | wxRIGHT | wxCENTER, 5);

  gridSizer->Add(fineSizer, 0, wxALL | wxCENTER, 5);

  topSizer->Add(gridSizer, 0, wxALL | wxCENTER, 5);

  wxBoxSizer *buttonSizer = new wxBoxSizer(wxHORIZONTAL);
  wxButton *okButton = new wxButton(this, wxID_OK, "OK");
  okButton->SetDefault();
  buttonSizer->Add(okButton, 0, wxALL, 5);
  buttonSizer->Add(new wxButton(this, wxID_CANCEL, "Cancel"), 0, wxALL, 5);
  //  buttonSizer->Add(new wxButton(this, wxID_HELP, "Help"), 0, wxALL, 5);

  topSizer->Add(buttonSizer, 0, wxALL | wxCENTER, 5);

  SetSizer(topSizer);
  topSizer->Fit(this);
  topSizer->SetSizeHints(this);
  Layout();
  CenterOnParent();
}

void dialogNfgQre::OnSolveUsing(wxCommandEvent &)
{
  m_startLambda->Enable(m_solveUsing->GetSelection() == 1);
  m_stopLambda->Enable(m_solveUsing->GetSelection() == 1);
  m_stepLambda->Enable(m_solveUsing->GetSelection() == 1);
  m_del1->Enable(m_solveUsing->GetSelection() == 1);
  m_tol1->Enable(m_solveUsing->GetSelection() == 1);
  m_del2->Enable(m_solveUsing->GetSelection() == 1);
  m_tol2->Enable(m_solveUsing->GetSelection() == 1);
}