Skip to content

Instantly share code, notes, and snippets.

@behrooz-tahanzadeh
Created February 21, 2016 22:19
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save behrooz-tahanzadeh/dfe58191a377bf2d195d to your computer and use it in GitHub Desktop.
Save behrooz-tahanzadeh/dfe58191a377bf2d195d to your computer and use it in GitHub Desktop.
SOFiSTiK solution for bending an element by contracting a cable
$ -- Developed By Behrooz Tahanzadeh --
$ ------------- Feb 2016 --------------
!#!CHAPTER Solution
+PROG ASE
HEAD CableContraction
ECHO FULL
LET#i 0
LOOP 100
SYST PROB TH3 ITER 9999 PLC #i
LC #i+1 DLZ 0.00 TITL 'iteration #i'
GRP ALL
GRP 10 FACS 0.001 PREX (#i+1)*0.01
LET#i #i+1
END
ENDLOOP
END
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment