// tcl wrapper for vtkOrgan object
//
#define VTK_STREAMS_FWD_ONLY
#include "vtkSystemIncludes.h"
#include "vtkOrgan.h"

#include "vtkTclUtil.h"
int vtkEsquiPolyDataCppCommand(vtkEsquiPolyData *op, Tcl_Interp *interp,
             int argc, char *argv[]);
int VTKTCL_EXPORT vtkOrganCppCommand(vtkOrgan *op, Tcl_Interp *interp,
             int argc, char *argv[]);

int VTKTCL_EXPORT vtkOrganCommand(ClientData cd, Tcl_Interp *interp,
             int argc, char *argv[])
{
  if ((argc == 2)&&(!strcmp("Delete",argv[1]))&& !vtkTclInDelete(interp))
    {
    Tcl_DeleteCommand(interp,argv[0]);
    return TCL_OK;
    }
   return vtkOrganCppCommand((vtkOrgan *)(((vtkTclCommandArgStruct *)cd)->Pointer),interp, argc, argv);
}

int VTKTCL_EXPORT vtkOrganCppCommand(vtkOrgan *op, Tcl_Interp *interp,
             int argc, char *argv[])
{
  int    tempi;
  double tempd;
  static char temps[80];
  int    error;

  error = 0; error = error;
  tempi = 0; tempi = tempi;
  tempd = 0; tempd = tempd;
  temps[0] = 0; temps[0] = temps[0];

  if (argc < 2)
    {
    Tcl_SetResult(interp, (char *) "Could not find requested method.", TCL_VOLATILE);
    return TCL_ERROR;
    }
  if (!interp)
    {
    if (!strcmp("DoTypecasting",argv[0]))
      {
      if (!strcmp("vtkOrgan",argv[1]))
        {
        argv[2] = (char *)((void *)op);
        return TCL_OK;
        }
      if (vtkEsquiPolyDataCppCommand((vtkEsquiPolyData *)op,interp,argc,argv) == TCL_OK)
        {
        return TCL_OK;
        }
      }
    return TCL_ERROR;
    }

  if (!strcmp("GetSuperClassName",argv[1]))
    {
    Tcl_SetResult(interp,(char *) "vtkEsquiPolyData", TCL_VOLATILE);
    return TCL_OK;
    }

  if ((!strcmp("GetClassName",argv[1]))&&(argc == 2))
    {
    const char    *temp20;
    error = 0;

    if (!error)
      {
      temp20 = (op)->GetClassName();
      if (temp20)
        {
        Tcl_SetResult(interp, (char*)temp20, TCL_VOLATILE);
        }
      else
        {
        Tcl_ResetResult(interp);
        }
      return TCL_OK;
      }
    }
  if ((!strcmp("IsA",argv[1]))&&(argc == 3))
    {
    char    *temp0;
    int      temp20;
    error = 0;

    temp0 = argv[2];
    if (!error)
      {
      temp20 = (op)->IsA(temp0);
      char tempResult[1024];
      sprintf(tempResult,"%i",temp20);
      Tcl_SetResult(interp, tempResult, TCL_VOLATILE);
      return TCL_OK;
      }
    }
  if ((!strcmp("NewInstance",argv[1]))&&(argc == 2))
    {
    vtkOrgan  *temp20;
    int vtkOrganCommand(ClientData, Tcl_Interp *, int, char *[]);
    error = 0;

    if (!error)
      {
      temp20 = (op)->NewInstance();
      vtkTclGetObjectFromPointer(interp,(void *)temp20,vtkOrganCommand);
      return TCL_OK;
      }
    }
  if ((!strcmp("GetClassName",argv[1]))&&(argc == 2))
    {
    const char    *temp20;
    error = 0;

    if (!error)
      {
      temp20 = (op)->GetClassName();
      if (temp20)
        {
        Tcl_SetResult(interp, (char*)temp20, TCL_VOLATILE);
        }
      else
        {
        Tcl_ResetResult(interp);
        }
      return TCL_OK;
      }
    }
  if ((!strcmp("SetModelId",argv[1]))&&(argc == 3))
    {
    int      temp0;
    error = 0;

    if (Tcl_GetInt(interp,argv[2],&tempi) != TCL_OK) error = 1;
    temp0 = tempi;
    if (!error)
      {
      op->SetModelId(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("GetCollisionModel",argv[1]))&&(argc == 2))
    {
    vtkModeloDeformable  *temp20;
    int vtkModeloDeformableCommand(ClientData, Tcl_Interp *, int, char *[]);
    error = 0;

    if (!error)
      {
      temp20 = (op)->GetCollisionModel();
      vtkTclGetObjectFromPointer(interp,(void *)temp20,vtkModeloDeformableCommand);
      return TCL_OK;
      }
    }
  if ((!strcmp("DeleteContacts",argv[1]))&&(argc == 2))
    {
    error = 0;

    if (!error)
      {
      op->DeleteContacts();
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("InitCollisionModel",argv[1]))&&(argc == 2))
    {
    error = 0;

    if (!error)
      {
      op->InitCollisionModel();
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("UpdateCollisionModel",argv[1]))&&(argc == 2))
    {
    error = 0;

    if (!error)
      {
      op->UpdateCollisionModel();
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("ContactID",argv[1]))&&(argc == 3))
    {
    vtkContact  *temp0;
    int      temp20;
    error = 0;

    temp0 = (vtkContact *)(vtkTclGetPointerFromObject(argv[2],(char *) "vtkContact",interp,error));
    if (!error)
      {
      temp20 = (op)->ContactID(temp0);
      char tempResult[1024];
      sprintf(tempResult,"%i",temp20);
      Tcl_SetResult(interp, tempResult, TCL_VOLATILE);
      return TCL_OK;
      }
    }
  if ((!strcmp("Inicializar",argv[1]))&&(argc == 2))
    {
    error = 0;

    if (!error)
      {
      op->Inicializar();
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("SetGravityInfo",argv[1]))&&(argc == 4))
    {
    char     temp0;
    char     temp1;
    error = 0;

    temp0 = *(argv[2]);
    temp1 = *(argv[3]);
    if (!error)
      {
      op->SetGravityInfo(temp0,temp1);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("SetMaxCutDistance",argv[1]))&&(argc == 3))
    {
    double   temp0;
    error = 0;

    if (Tcl_GetDouble(interp,argv[2],&tempd) != TCL_OK) error = 1;
    temp0 = tempd;
    if (!error)
      {
      op->SetMaxCutDistance(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("SetScale",argv[1]))&&(argc == 3))
    {
    double   temp0;
    error = 0;

    if (Tcl_GetDouble(interp,argv[2],&tempd) != TCL_OK) error = 1;
    temp0 = tempd;
    if (!error)
      {
      op->SetScale(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("SetTipsDistance",argv[1]))&&(argc == 3))
    {
    double   temp0;
    error = 0;

    if (Tcl_GetDouble(interp,argv[2],&tempd) != TCL_OK) error = 1;
    temp0 = tempd;
    if (!error)
      {
      op->SetTipsDistance(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("UpdateGeometry",argv[1]))&&(argc == 2))
    {
    error = 0;

    if (!error)
      {
      op->UpdateGeometry();
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("ContainFluid",argv[1]))&&(argc == 3))
    {
    int      temp0;
    error = 0;

    if (Tcl_GetInt(interp,argv[2],&tempi) != TCL_OK) error = 1;
    temp0 = tempi;
    if (!error)
      {
      op->ContainFluid(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("CanBeClipped",argv[1]))&&(argc == 3))
    {
    int      temp0;
    error = 0;

    if (Tcl_GetInt(interp,argv[2],&tempi) != TCL_OK) error = 1;
    temp0 = tempi;
    if (!error)
      {
      op->CanBeClipped(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("SetForceFactor",argv[1]))&&(argc == 3))
    {
    float    temp0;
    error = 0;

    if (Tcl_GetDouble(interp,argv[2],&tempd) != TCL_OK) error = 1;
    temp0 = tempd;
    if (!error)
      {
      op->SetForceFactor(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("GetForceFactor",argv[1]))&&(argc == 2))
    {
    float    temp20;
    error = 0;

    if (!error)
      {
      temp20 = (op)->GetForceFactor();
      char tempResult[1024];
      sprintf(tempResult,"%g",temp20);
      Tcl_SetResult(interp, tempResult, TCL_VOLATILE);
      return TCL_OK;
      }
    }
  if ((!strcmp("SetUV",argv[1]))&&(argc == 5))
    {
    int      temp0;
    float    temp1;
    float    temp2;
    error = 0;

    if (Tcl_GetInt(interp,argv[2],&tempi) != TCL_OK) error = 1;
    temp0 = tempi;
    if (Tcl_GetDouble(interp,argv[3],&tempd) != TCL_OK) error = 1;
    temp1 = tempd;
    if (Tcl_GetDouble(interp,argv[4],&tempd) != TCL_OK) error = 1;
    temp2 = tempd;
    if (!error)
      {
      op->SetUV(temp0,temp1,temp2);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("Enganchable",argv[1]))&&(argc == 3))
    {
    int      temp0;
    error = 0;

    if (Tcl_GetInt(interp,argv[2],&tempi) != TCL_OK) error = 1;
    temp0 = tempi;
    if (!error)
      {
      op->Enganchable(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("AddContact",argv[1]))&&(argc == 3))
    {
    vtkContact  *temp0;
    error = 0;

    temp0 = (vtkContact *)(vtkTclGetPointerFromObject(argv[2],(char *) "vtkContact",interp,error));
    if (!error)
      {
      op->AddContact(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("AddLink",argv[1]))&&(argc == 3))
    {
    vtkLink  *temp0;
    error = 0;

    temp0 = (vtkLink *)(vtkTclGetPointerFromObject(argv[2],(char *) "vtkLink",interp,error));
    if (!error)
      {
      op->AddLink(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("ContactLost",argv[1]))&&(argc == 3))
    {
    vtkContact  *temp0;
    error = 0;

    temp0 = (vtkContact *)(vtkTclGetPointerFromObject(argv[2],(char *) "vtkContact",interp,error));
    if (!error)
      {
      op->ContactLost(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("RemoveLink",argv[1]))&&(argc == 3))
    {
    vtkLink  *temp0;
    error = 0;

    temp0 = (vtkLink *)(vtkTclGetPointerFromObject(argv[2],(char *) "vtkLink",interp,error));
    if (!error)
      {
      op->RemoveLink(temp0);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("RemoveRemovedConstraints",argv[1]))&&(argc == 2))
    {
    error = 0;

    if (!error)
      {
      op->RemoveRemovedConstraints();
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }
  if ((!strcmp("GetNumIter",argv[1]))&&(argc == 2))
    {
    int      temp20;
    error = 0;

    if (!error)
      {
      temp20 = (op)->GetNumIter();
      char tempResult[1024];
      sprintf(tempResult,"%i",temp20);
      Tcl_SetResult(interp, tempResult, TCL_VOLATILE);
      return TCL_OK;
      }
    }
  if ((!strcmp("AddBoundaryCondition",argv[1]))&&(argc == 5))
    {
    long     temp0;
    long     temp1;
    long     temp2;
    error = 0;

    if (Tcl_GetInt(interp,argv[2],&tempi) != TCL_OK) error = 1;
    temp0 = tempi;
    if (Tcl_GetInt(interp,argv[3],&tempi) != TCL_OK) error = 1;
    temp1 = tempi;
    if (Tcl_GetInt(interp,argv[4],&tempi) != TCL_OK) error = 1;
    temp2 = tempi;
    if (!error)
      {
      op->AddBoundaryCondition(temp0,temp1,temp2);
      Tcl_ResetResult(interp);
      return TCL_OK;
      }
    }

  if (!strcmp("ListInstances",argv[1]))
    {
    vtkTclListInstances(interp,(ClientData)vtkOrganCommand);
    return TCL_OK;
    }

  if (!strcmp("ListMethods",argv[1]))
    {
    vtkEsquiPolyDataCppCommand(op,interp,argc,argv);
    Tcl_AppendResult(interp,"Methods from vtkOrgan:\n",NULL);
    Tcl_AppendResult(interp,"  GetSuperClassName\n",NULL);
    Tcl_AppendResult(interp,"  GetClassName\n",NULL);
    Tcl_AppendResult(interp,"  IsA\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  NewInstance\n",NULL);
    Tcl_AppendResult(interp,"  GetClassName\n",NULL);
    Tcl_AppendResult(interp,"  SetModelId\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  GetCollisionModel\n",NULL);
    Tcl_AppendResult(interp,"  DeleteContacts\n",NULL);
    Tcl_AppendResult(interp,"  InitCollisionModel\n",NULL);
    Tcl_AppendResult(interp,"  UpdateCollisionModel\n",NULL);
    Tcl_AppendResult(interp,"  ContactID\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  Inicializar\n",NULL);
    Tcl_AppendResult(interp,"  SetGravityInfo\t with 2 args\n",NULL);
    Tcl_AppendResult(interp,"  SetMaxCutDistance\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  SetScale\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  SetTipsDistance\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  UpdateGeometry\n",NULL);
    Tcl_AppendResult(interp,"  ContainFluid\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  CanBeClipped\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  SetForceFactor\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  GetForceFactor\n",NULL);
    Tcl_AppendResult(interp,"  SetUV\t with 3 args\n",NULL);
    Tcl_AppendResult(interp,"  Enganchable\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  AddContact\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  AddLink\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  ContactLost\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  RemoveLink\t with 1 arg\n",NULL);
    Tcl_AppendResult(interp,"  RemoveRemovedConstraints\n",NULL);
    Tcl_AppendResult(interp,"  GetNumIter\n",NULL);
    Tcl_AppendResult(interp,"  AddBoundaryCondition\t with 3 args\n",NULL);
    return TCL_OK;
    }

  if (vtkEsquiPolyDataCppCommand((vtkEsquiPolyData *)op,interp,argc,argv) == TCL_OK)
    {
    return TCL_OK;
    }

  if ((argc >= 2)&&(!strstr(interp->result,"Object named:")))
    {
    char temps2[256];
    sprintf(temps2,"Object named: %s, could not find requested method: %s\nor the method was called with incorrect arguments.\n",argv[0],argv[1]);
    Tcl_AppendResult(interp,temps2,NULL);
    }
  return TCL_ERROR;
}