Skip to content

Commit efa9ca4

Browse files
committed
adjustments to vonMises
1 parent bc102c8 commit efa9ca4

File tree

3 files changed

+8
-5
lines changed

3 files changed

+8
-5
lines changed

src/common/m_variables_conversion.fpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1034,7 +1034,7 @@ contains
10341034
end if
10351035
#ifndef POST_PROCESS
10361036
! to save von Mises stress instead of elastic internal energy
1037-
qK_prim_vf(xiend+1)%sf(j, k, l) = sqrt((3/2)*qK_prim_vf(1)%sf(j, k, l)**2 + &
1037+
qK_prim_vf(xiend+1)%sf(j, k, l) = sqrt((3d0/2d0)*qK_prim_vf(1)%sf(j, k, l)**2 + &
10381038
2*qK_prim_vf(2)%sf(j, k, l)**2 + qK_prim_vf(3)%sf(j, k, l)**2 + &
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)

src/post_process/m_start_up.f90

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -394,7 +394,10 @@ subroutine s_save_data(t_step, varname, pres, c, H)
394394
call s_write_variable_to_formatted_database_file(varname, t_step)
395395
end if
396396
if (prim_vars_wrt) then
397-
q_sf = q_prim_vf(xiend+1)%sf(j, k, l)
397+
q_sf = q_prim_vf(xiend+1)%sf( &
398+
-offset_x%beg:m + offset_x%end, &
399+
-offset_y%beg:n + offset_y%end, &
400+
-offset_z%beg:p + offset_z%end)
398401
write (varname, '(A,I0)') 'vonMises'
399402
call s_write_variable_to_formatted_database_file(varname, t_step)
400403
end if

submit_hyper.sh

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
#!/bin/bash
22

3-
./mfc.sh run ./examples/3D_hyperelasticity/hyper_gel.py -p batch -N 1 -n 4 -g 0 -w 01:00:00 -# test1 -t pre_process -c oscar
4-
./mfc.sh run ./examples/3D_hyperelasticity/hyper_gel.py -p batch -N 1 -n 4 -g 0 -w 01:00:00 -# test1 -t simulation -c oscar
3+
#./mfc.sh run ./examples/3D_hyperelasticity/hyper_gel.py -p batch -N 1 -n 4 -g 0 -w 01:00:00 -# test1 -t pre_process -c oscar
4+
#./mfc.sh run ./examples/3D_hyperelasticity/hyper_gel.py -p batch -N 1 -n 4 -g 0 -w 01:00:00 -# test1 -t simulation -c oscar
55
#./mfc.sh run /scratch/bciv/rodrigu1/cav2024/hyper/hyper_gel.py -p gpuA40x4 -N 1 -n 1 -g 1 -w 01:00:00 -# test1 -t post_process -a bciv-delta-gpu -c delta
66

7-
7+
./mfc.sh run /projects/bciv/mcarcanabarbosa/ctr/gel/geldef.py -p gpuA100x4 -N 1 -n 4 -g 1 -w 01:00:00 -#gel25 -t post_process -a bciv-delta-gpu -c delta

0 commit comments

Comments
 (0)