/home/eoseret/qaas_runs_CPU_9468/171-152-3172/intel/CloverLeafFC/build/CloverLeafFC/CloverLeaf_ref/kernels/ideal_gas_kernel.f90: 50 - 55
--------------------------------------------------------------------------------

50:         v=1.0_8/density(j,k)
51:         pressure(j,k)=(1.4_8-1.0_8)*density(j,k)*energy(j,k)
52:         pressurebyenergy=(1.4_8-1.0_8)*density(j,k)
53:         pressurebyvolume=-density(j,k)*pressure(j,k)
54:         sound_speed_squared=v*v*(pressure(j,k)*pressurebyenergy-pressurebyvolume)
55:         soundspeed(j,k)=SQRT(sound_speed_squared)
