gkowal/amun-code
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

EQUATIONS: Rename parameter 'csnd' to 'sound_speed'.

Browse Source 
Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2020-08-16 16:46:27 -03:00
parent fda340b21b
commit 6bf3afcf0b
4 changed files with 15 additions and 15 deletions

2
sources/equations.F90

@ -1131,7 +1131,7 @@ module equations
! obtain the isothermal sound speed
!
call get_parameter("csnd" , csnd )
call get_parameter("sound_speed", csnd )
! calculate additional parameters
!

4
sources/io.F90

@ -2576,7 +2576,7 @@ module io
call write_attribute_xml(lun, "eos" , eos)
call write_attribute_xml(lun, "nvars" , nv)
call write_attribute_xml(lun, "adiabatic_index", adiabatic_index)
call write_attribute_xml(lun, "csnd" , csnd)
call write_attribute_xml(lun, "sound_speed" , csnd)
call write_attribute_xml(lun, "viscosity" , viscosity)
call write_attribute_xml(lun, "resistivity" , resistivity)
write(lun,"(a)") '</Physics>'
@ -4036,7 +4036,7 @@ module io
call write_attribute(gid, 'adiabatic_index', adiabatic_index)
end if
if (eos == 'iso') then
call write_attribute(gid, 'csnd' , csnd )
call write_attribute(gid, 'sound_speed', csnd)
end if
! store the vector attributes

12
sources/problems.F90

@ -462,12 +462,12 @@ module problems
! get problem parameters
!
call get_parameter("dens" , dens )
call get_parameter("ratio" , ratio )
call get_parameter("radius", radius)
call get_parameter("csnd" , csnd )
call get_parameter("buni" , buni )
call get_parameter("angle" , angle )
call get_parameter("dens" , dens )
call get_parameter("ratio" , ratio )
call get_parameter("radius" , radius)
call get_parameter("sound_speed", csnd )
call get_parameter("buni" , buni )
call get_parameter("angle" , angle )
#if NDIMS == 3
! get the fine grid resolution

12
sources/shapes.F90

@ -421,12 +421,12 @@ module shapes
! get problem parameters
!
call get_parameter("dens" , dens )
call get_parameter("ratio" , ratio )
call get_parameter("radius", radius)
call get_parameter("csnd" , csnd )
call get_parameter("buni" , buni )
call get_parameter("angle" , angle )
call get_parameter("dens" , dens )
call get_parameter("ratio" , ratio )
call get_parameter("radius" , radius)
call get_parameter("sound_speed", csnd )
call get_parameter("buni" , buni )
call get_parameter("angle" , angle )
! set the conditions inside the radius
!