Searched refs:ESTRESS (Results 1 – 11 of 11) sorted by relevance
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/static/ |
H A D | fstr_NodalStress.f90 | 221 …fstrSOLID%ESTRESS(6*(icel-1)+1:6*(icel-1)+6) = fstrSOLID%ESTRESS(6*(icel-1)+1:6*(icel-1)+6) + estr… 259 fstrSOLID%EMISES(i) = get_mises(fstrSOLID%ESTRESS(6*(i-1)+1:6*(i-1)+6)) 301 layer%ESTRESS(6*(icel-1)+k) = layer%ESTRESS(6*(icel-1)+k) + stress(j,k)/nn 335 … & + weight*(0.5d0*layer%PLUS%ESTRESS(6*(icel-1)+j) + 0.5d0*layer%MINUS%ESTRESS(6*(icel-1)+j)) 607 fstrSOLID%ESTRESS(3*icel-2) = estress(1) 608 fstrSOLID%ESTRESS(3*icel-1) = estress(2) 609 fstrSOLID%ESTRESS(3*icel-0) = estress(3) 824 layer%ESTRESS(6*(icel-1)+k) = layer%ESTRESS(6*(icel-1)+k) + ndstress(j,k)/nn 837 layer%ESTRESS(6*(icel-1)+k) = layer%ESTRESS(6*(icel-1)+k) + ndstress(j,k)/nn 857 …fstrSOLID%ESTRESS(6*(icel-1)+1:6*(icel-1)+6) = fstrSOLID%ESTRESS(6*(icel-1)+1:6*(icel-1)+6) + estr… [all …]
|
H A D | static_output.f90 | 146 ESmax(k) = fstrSOLID%ESTRESS(k); ESmin(k) = fstrSOLID%ESTRESS(k) 210 if( fstrSOLID%ESTRESS(mdof*(i-1)+k) > ESmax(k) ) then 211 ESmax(k) = fstrSOLID%ESTRESS(mdof*(i-1)+k) 213 else if( fstrSOLID%ESTRESS(mdof*(i-1)+k) < ESmin(k) ) then 214 ESmin(k) = fstrSOLID%ESTRESS(mdof*(i-1)+k)
|
H A D | make_result.f90 | 473 call hecmw_result_add( id, nitem, label, RES%ESTRESS ) 1020 fstrRESULT%elem_val_item(eitem*(i-1)+j+jitem) = fstrSOLID%SOLID%ESTRESS((nn)*(i-1)+j) 1263 fstrRESULT%elem_val_item(eitem*(i-1)+j+jitem) = RES%ESTRESS((nn)*(i-1)+j)
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/dynamic/transit/ |
H A D | dynamic_output.f90 | 146 ESmax(k) = fstrSOLID%ESTRESS(k); ESmin(k) = fstrSOLID%ESTRESS(k) 224 if( fstrSOLID%ESTRESS(mdof*(i-1)+k) > ESmax(k) ) then 225 ESmax(k) = fstrSOLID%ESTRESS(mdof*(i-1)+k) 227 else if( fstrSOLID%ESTRESS(mdof*(i-1)+k) < ESmin(k) ) then 228 ESmin(k) = fstrSOLID%ESTRESS(mdof*(i-1)+k)
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/tests/nonlinear/contact/ |
H A D | 2box_hex_fric.cnt | 16 ESTRESS,ON
|
H A D | 2box_hex_nofric.cnt | 16 ESTRESS,ON
|
H A D | 2box_mix_nofric.cnt | 16 ESTRESS,ON
|
H A D | 2box_tet_nofric.cnt | 16 ESTRESS,ON
|
H A D | 2box_tet_fric.cnt | 16 ESTRESS,ON
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/lib/ |
H A D | m_fstr.f90 | 203 real(kind=kreal), pointer :: ESTRESS(:) => null() !< elemental stress component 311 real(kind=kreal), pointer :: ESTRESS(:) !< elemental stress component 674 nullify( S%ESTRESS ) 1088 phys%ESTRESS = 0.0d0
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/common/ |
H A D | fstr_setup.f90 | 1512 allocate ( phys%ESTRESS (mdof*n_elem)) 1548 P%SOLID%ESTRESS => phys%ESTRESS
|