Ignore:
Timestamp:
Sep 27, 2008 1:58:13 AM (14 years ago)
Author:
liveletlive
Message:

Changes Made: Vanilla restart added, no modifications can be made to existing parameters in the middle of a run. Only mutation creates a new population on restart.
New configuration options added: MutationandCrossover? option. amount to be mutated made configurable. configration for (not)allowing duplicate strings added. app-qdot and simple modified to keep pace with these changes.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/packages/optimizer/src/rp_optimizer_tcl.c

    r1154 r1166  
    1717
    1818extern int pgapack_abort;
     19extern int pgapack_restart_user_action;
    1920
    2021/*
     
    5758  {"-max", RP_OPTION_DOUBLE, Rp_Offset(RpOptimParamNumber,max)},
    5859  {"-mutnrate",RP_OPTION_DOUBLE, Rp_Offset(RpOptimParamNumber,mutnrate)},
     60  {"-mutnValue",RP_OPTION_DOUBLE, Rp_Offset(RpOptimParamNumber,mutnValue)},
    5961  {"-randdist",&RpOption_RandDist,Rp_Offset(RpOptimParamNumber,randdist)},
    6062  {"-strictmin",RP_OPTION_BOOLEAN,Rp_Offset(RpOptimParamNumber,strictmin)},
     
    8385#endif
    8486
    85 extern int pgapack_abort;
     87
    8688extern void PGARuntimeDataTableInit();
    8789extern void PGARuntimeDataTableDeInit();
     
    394396        pgapack_abort = value;
    395397        return TCL_OK;
    396     } else if (*option == 'g' && strcmp(option,"get") == 0) {
     398    }else if (*option == 'r' && strcmp(option,"restart") == 0){
     399                int value;
     400        if (objc < 3) {
     401            Tcl_WrongNumArgs(interp, 1, objv, "restart bool");
     402            return TCL_ERROR;
     403        }
     404                if (Tcl_GetBooleanFromObj(interp, objv[2], &value) != TCL_OK) {
     405                return TCL_ERROR;
     406                }
     407                pgapack_restart_user_action = value;
     408                return TCL_OK;   
     409        }else if (*option == 'g' && strcmp(option,"get") == 0) {
    397410        /*
    398411         * OPTION:  get ?globPattern? ?-option?
Note: See TracChangeset for help on using the changeset viewer.