Skip to content

Commit 939c639

Browse files
committed
von Mises compiles + fix of populate variable buffer in rhs for hyperelasticity
1 parent a251fa2 commit 939c639

File tree

2 files changed

+1
-2
lines changed

2 files changed

+1
-2
lines changed

src/common/m_variables_conversion.fpp

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1039,7 +1039,6 @@ contains
10391039
2*qK_prim_vf(4)%sf(j, k, l)**2 + 2*qK_prim_vf(5)%sf(j, k, l)**2 + &
10401040
qK_prim_vf(6)%sf(j, k, l)**2)
10411041
#endif
1042-
end if
10431042

10441043
!$acc loop seq
10451044
do i = advxb, advxe

src/simulation/m_rhs.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -675,7 +675,7 @@ contains
675675
call nvtxStartRange("RHS-ELASTIC")
676676
if (hyperelasticity) then
677677
call s_hyperelastic_rmt_stress_update(q_cons_qp%vf, q_prim_qp%vf)
678-
call s_populate_primitive_variables_buffers(q_prim_qp%vf, pb, mv)
678+
call s_populate_variables_buffers(q_prim_qp%vf, pb, mv)
679679
end if
680680
call nvtxEndRange
681681

0 commit comments

Comments
 (0)