191 lines (178 with data), 5.8 kB

    // Ligament group index
    AnyIntVar li = 1; 
    // generic ligament lengths for the standard man 
    // (need to be calibrated if scaled)   
    ALLL1L2.L0 = 4.472135954999584e-003;
    PLLL1L2.L0 = 2.828427124746193e-003;
    ISL1L2.L0 = 1.784656829757482e-002;
    SSL1L2.L0 = 1.926272306814388e-002;
    FlavumL1L2R.L0 = 1.369306393762912e-002;
    FlavumL1L2L.L0 = 1.369306393762912e-002;
#ifndef exclude_it
  InterTransverseL1L2R.L0 = 3.167885312722565e-002;  
  InterTransverseL1L2L.L0 = 3.167885312722565e-002;  
  InterTransverseL1L2midR.L0 = 3.167885312722565e-002;  
  InterTransverseL1L2midL.L0 = 3.167885312722565e-002;  
#endif
    
#ifndef exclude_all
    AnyLigamentModelPol ALLL1L2 = 
    {
      ////L0 = .al_slack_length*1.5;
      eps1 = ..epsALL[.li];
      F1 = ..kALL[.li]*eps1*L0;
    };
    
    AnyLigamentViaPoint lALLofL1L2 = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.ALLNodeInferior;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.ALLNodeSuperior;
      
      AnyLigamentModelPol &Model = .ALLL1L2;
      AnyDrawPLine drw = {
        Thickness = 0.005;
        RGB = {1,0,0};
      };
    };   
#endif
#ifndef exclude_pll
    AnyLigamentModelPol PLLL1L2 = 
    {
      //L0 = .pl_slack_length*1.5;
      eps1 = ..epsPLL[.li];
      F1 = ..kPLL[.li]*eps1*L0;
    };
    AnyLigamentViaPoint lPLLofL1L2 = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.PLLNodeInferior;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.PLLNodeSuperior;

      AnyLigamentModelPol &Model = .PLLL1L2;
      AnyDrawPLine drw = {
        Thickness = 0.005;
        RGB = {1,0,0};
      };
    };
#endif    
#ifndef exclude_isl
    AnyLigamentModelPol ISL1L2 = 
    {
      //L0 = .is_slack_length*1.5;
      eps1 = ..epsISL[.li];
      F1 = ..kISL[.li]*eps1*L0;
    };
     AnyLigamentViaPoint lISofL1L2 = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.InterspinousInferior;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.InterspinousSuperior;

      AnyLigamentModelPol &Model = .ISL1L2;
      AnyDrawPLine drw = {
        Thickness = 0.005;
        RGB = {1,0,0};
      };
    };
#endif
#ifndef exclude_ssl
    AnyLigamentModelPol SSL1L2 = 
    {
      //L0 = .ss_slack_length*1.5;
      eps1 = ..epsSSL[.li];
      F1 = ..kSSL[.li]*eps1*L0;
    };
    AnyLigamentViaPoint lSSofL1L2 = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.SupraspinousInferior;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.SupraspinousSuperior;

      AnyLigamentModelPol &Model = .SSL1L2;
      AnyDrawPLine drw = {
        Thickness = 0.005;
        RGB = {1,0,0};
      };
    };
      
#endif
#ifndef exclude_lf
    AnyLigamentModelPol FlavumL1L2R = 
    {
      //L0 = .lf_slack_length*1.5;
      eps1 = ..epsLF[.li];
      F1 = ..kLF[.li]*eps1*L0;
    };
    AnyLigamentModelPol FlavumL1L2L = 
    {
      //L0 = .lf_slack_length*1.5;
      eps1 = ..epsLF[.li];
      F1 = ..kLF[.li]*eps1*L0;
    };
    AnyLigamentViaPoint lFlavumofL1L2R = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.FlavumInferiorR;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.FlavumSuperiorR;

      AnyLigamentModelPol &Model = .FlavumL1L2R;
      AnyDrawPLine drw = {
        Thickness= 0.005;
        RGB = {1,0,0};
      };
    };
    AnyLigamentViaPoint lFlavumofL1L2L = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.FlavumInferiorL;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.FlavumSuperiorL;

      AnyLigamentModelPol &Model = .FlavumL1L2L;
      AnyDrawPLine drw = {
        Thickness= 0.005;
        RGB = {1,0,0};
      };
    };      
#endif
#ifndef exclude_it
    AnyLigamentModelPol InterTransverseL1L2R = 
    {
      //L0 = .lf_slack_length*1.5;
      eps1 = ..epsIT[.li];
      F1 = ..kIT[.li]*eps1*L0;
    };
    AnyLigamentModelPol InterTransverseL1L2L = 
    {
      //L0 = .lf_slack_length*1.5;
      eps1 = ..epsIT[.li];
      F1 = ..kIT[.li]*eps1*L0;
    };
    AnyLigamentModelPol InterTransverseL1L2midR = 
    {
      //L0 = .lf_slack_length*1.5;
      eps1 = ..epsIT[.li];
      F1 = ..kIT[.li]*eps1*L0;
    };
    AnyLigamentModelPol InterTransverseL1L2midL = 
    {
      //L0 = .lf_slack_length*1.5;
      eps1 = ..epsIT[.li];
      F1 = ..kIT[.li]*eps1*L0;
    };
    AnyLigamentViaPoint lInterTransverseofL1L2R = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.InterTransverseR;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.InterTransverseR;

      AnyLigamentModelPol &Model = .InterTransverseL1L2R;
      AnyDrawPLine drw = {
        Thickness= 0.005;
        RGB = {1,0,0};
      };
    };
    AnyLigamentViaPoint lInterTransverseofL1L2L = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.InterTransverseL;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.InterTransverseL;

      AnyLigamentModelPol &Model = .InterTransverseL1L2L;
      AnyDrawPLine drw = {
        Thickness= 0.005;
        RGB = {1,0,0};
      };
    };      
    AnyLigamentViaPoint lInterTransverseofL1L2Rmid = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.InterTransverseRmid;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.InterTransverseRmid;

      AnyLigamentModelPol &Model = .InterTransverseL1L2midR;
      AnyDrawPLine drw = {
        Thickness= 0.005;
        RGB = {1,0,0};
      };
    };
    AnyLigamentViaPoint lInterTransverseofL1L2Lmid = {
      AnyRefNode &Ori = ...SegmentsLumbar.L1Seg.InterTransverseLmid;
      AnyRefNode &End = ...SegmentsLumbar.L2Seg.InterTransverseLmid;

      AnyLigamentModelPol &Model = .InterTransverseL1L2midL;
      AnyDrawPLine drw = {
        Thickness= 0.005;
        RGB = {1,0,0};
      };
    };
#endif