General Mechanical

General Mechanical

Non linear buckling analysis of column

    • inaamqazi
      Subscriber

      1) what would constitute appropriate boundary conditions for a line model . I have applied uy and rotz at one end , ux at the top end, and symmetry boundary conditions on z axis.I have modelled half the length of the column But the non linear solution is terminating even if i increase the substeps significantly from 100 to 1000. I want to consider only geometric non linearity .I am solving in apdl

    • ding
      Subscriber

      Can you give me your apdl commands for detailed problems  or give me some model pictures ?

    • inaamqazi
      Subscriber

      /NOPR   ! Suppress printing of UNDO process 


      /PMACRO ! Echo following commands to log    


      FINISH  ! Make sure we are at BEGIN level   


      /CLEAR,NOSTART  ! Clear model since no SAVE found   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      ! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   


      !*  


      !*  


      /NOPR   


      KEYW,PR_SET,1   


      KEYW,PR_STRUC,1 


      KEYW,PR_THERM,0 


      KEYW,PR_FLUID,0 


      KEYW,PR_ELMAG,0 


      KEYW,MAGNOD,0   


      KEYW,MAGEDG,0   


      KEYW,MAGHFE,0   


      KEYW,MAGELC,0   


      KEYW,PR_MULTI,0 


      /GO 


      !*  


      !*  


      /PREP7  


      !*  


      ET,1,BEAM188


      !*  


      KEYOPT,1,1,0


      KEYOPT,1,2,0


      KEYOPT,1,3,3


      KEYOPT,1,4,0


      KEYOPT,1,6,0


      KEYOPT,1,7,0


      KEYOPT,1,9,0


      KEYOPT,1,11,0   


      KEYOPT,1,12,0   


      KEYOPT,1,15,0   


      !*  


      !*  


      MPTEMP,,,,,,,,  


      MPTEMP,1,0  


      MPDATA,EX,1,,33500  


      MPDATA,PRXY,1,,0.15 


      SECTYPE,   1, BEAM, RECT, , 0   


      SECOFFSET, CENT 


      SECDATA,1500,5000,0,0,0,0,0,0,0,0,0,0   


      N,1,0,0,,,,,


      N,101,0,4400,,,,,   


      !*  


      FILL,1,101,99, , ,1,1,1,


      !*  


      /ZOOM,1,SCRN,0.341257,-0.888843,0.351177,-0.938430  


      FLST,2,2,1  


      FITEM,2,1   


      FITEM,2,2   


      E,P51X  


      /AUTO,1 


      /REP,FAST   


      /ZOOM,1,SCRN,0.356137,-0.898760,0.385896,-0.935950  


      FLST,4,1,2,ORDE,1   


      FITEM,4,1   


      EGEN,100,1,P51X, , , , , , , , , , ,


      EPLOT   


      /AUTO,1 


      /REP,FAST   


      FLST,2,1,1,ORDE,1   


      FITEM,2,1   


      !*  


      /GO 


      D,P51X, , , , , ,UY,ROTZ, , , , 


      FLST,2,1,1,ORDE,1   


      FITEM,2,101 


      !*  


      /GO 


      D,P51X, , , , , ,UX, , , , ,


      DSYM,SYMM,Z, ,  


      !*  


      FINISH  


      /SOL


      FLST,2,1,1,ORDE,1   


      FITEM,2,101 


      !*  


      /GO 


      F,P51X,FY,-1


      !*  


      ANTYPE,0


      PSTRES,1


      /STATUS,SOLU


      SOLVE   


      FINISH  


      /POST1  


      PLDISP,1


      /VIEW,1,1,1,1   


      /ANG,1  


      /REP,FAST   


      /AUTO,1 


      /REP,FAST   


      /DIST, 1 ,1.082226,1


      /REP,FAST   


      /DIST, 1 ,1.082226,1


      /REP,FAST   


      FINISH  


      /SOL


      !*  


      ANTYPE,1


      !*  


      BUCOPT,LANB,5,0,0,CENTER


      MXPAND,5,0,0,0,0.001,   


      /STATUS,SOLU


      SOLVE   


      FINISH  


      /POST1  


      SET,LIST,999


      SET,,, ,,, ,1   


      /REPLOT 


      SET,LIST,999


      SET,,, ,,, ,1   


      SET,LIST,999


      /USER,  1   


      /REPLO  


      /REPLO  


      FINISH  


      /SOL


      !*  


      ANTYPE,0


      FLST,2,1,1,ORDE,1   


      FITEM,2,2   


      !*  


      /GO 


      F,P51X,FX,3600000   


      !*  


      /PSF,PRES,NORM,2,0,1


      /PBF,DEFA, ,1   


      /PSYMB,CS,0 


      /PSYMB,NDIR,0   


      /PSYMB,ESYS,0   


      /PSYMB,LDIV,0   


      /PSYMB,LDIR,0   


      /PSYMB,ADIR,0   


      /PSYMB,ECON,0   


      /PSYMB,XNODE,0  


      /PSYMB,DOT,1


      /PSYMB,PCONV,   


      /PSYMB,LAYR,0   


      /PSYMB,FBCS,0   


      !*  


      /PBC,ALL, ,1


      /REP


      !*  


      /ZOOM,1,SCRN,0.283175,0.813653,0.376187,0.650922


      !*  


      /PSF,PRES,NORM,2,0,1


      /PBF,DEFA, ,1   


      /PSYMB,CS,0 


      /PSYMB,NDIR,0   


      /PSYMB,ESYS,0   


      /PSYMB,LDIV,0   


      /PSYMB,LDIR,0   


      /PSYMB,ADIR,0   


      /PSYMB,ECON,0   


      /PSYMB,XNODE,0  


      /PSYMB,DOT,1


      /PSYMB,PCONV,   


      /PSYMB,LAYR,0   


      /PSYMB,FBCS,0   


      !*  


      /PBC,ALL, ,1


      /REP


      !*  


      FLST,2,1,1,ORDE,1   


      FITEM,2,101 


      !*  


      /GO 


      F,P51X,FY,-2500000  


      ANTYPE,0


      NLGEOM,1


      NSUBST,2000,0,0 


      OUTRES,ERASE


      OUTRES,ALL,ALL  


      AUTOTS,1


      NEQIT,2100  


      RESCONTRL,DEFINE,ALL,ALL,-1 


      /STATUS,SOLU


      SOLVE   


      FINISH  


      /POST1  


      PLDISP,1


      /VIEW,1,1,1,1   


      /ANG,1  


      /REP,FAST   


      /AUTO,1 


      /REP,FAST   


      !*  


      /EFACET,1   


      PLNSOL, U,SUM, 0,1.0


      ! SET,LIST,999  


      SET,,, ,,, ,205 


      /REPLOT 


      FINISH  


      /POST26 


      FILE,'file','rst','.'   


      /UI,COLL,1  


      NUMVAR,200  


      SOLU,191,NCMIT  


      STORE,MERGE 


      FILLDATA,191,,,,1,1 


      REALVAR,191,191 


      /DIST, 1 ,1.082226,1


      /REP,FAST   


      /DIST, 1 ,1.082226,1


      /REP,FAST   


      /DIST, 1 ,1.082226,1


      /REP,FAST   


      !*  


      NSOL,2,1,U,X, UX_4, 


      STORE,MERGE 


      !*  


      RFORCE,3,1,F,Y, FY_3


      STORE,MERGE 


      FINISH  


      /AUX12  


      FINISH  


      /POST26 


      NUMVAR,200  


      FILLDATA,191,,,,1,1 


      REALVAR,191,191 


      XVAR,2  


      PLVAR,3,


      XVAR,2  


      PLVAR,3,


      NUMVAR,200  


      FILLDATA,191,,,,1,1 


      REALVAR,191,191 


      XVAR,2  


      PLVAR,3,


      FINISH  


      /POST1  


      !*  


      PRNSOL,U,COMP   


      )/GOP    ! Resume printing after UNDO process   


      )! We suggest a save at this point  


       

    • inaamqazi
      Subscriber

      @ding ..can you share your research gate profile so that we can remain in touch.


      With Regards


      Inaam

Viewing 3 reply threads
  • You must be logged in to reply to this topic.