/beegfs/hackathon/users/eoseret/qaas_runs_test/178-661-4072/intel/CloverLeaf1.3-FC/build/aocc_2/CMakeFiles/clover_leaf.dir/CloverLeaf_ref/kernels/ideal_gas_kernel.f90-pp.f90: 45 - 59
--------------------------------------------------------------------------------

45: # 45 "/beegfs/hackathon/users/eoseret/qaas_runs_test/178-661-4072/intel/CloverLeaf1.3-FC/build/CloverLeaf1.3-FC/CloverLeaf_ref/kernels/ideal_gas_kernel.f90"
46:     !$OMP PARALLEL
47:     !$OMP DO PRIVATE(v,pressurebyenergy,pressurebyvolume,sound_speed_squared)
48:     DO k=y_min,y_max
49:     !$OMP SIMD
50:       DO j=x_min,x_max
51:         v=1.0_8/density(j,k)
52:         pressure(j,k)=(1.4_8-1.0_8)*density(j,k)*energy(j,k)
53:         pressurebyenergy=(1.4_8-1.0_8)*density(j,k)
54:         pressurebyvolume=-density(j,k)*pressure(j,k)
55:         sound_speed_squared=v*v*(pressure(j,k)*pressurebyenergy-pressurebyvolume)
56:         soundspeed(j,k)=SQRT(sound_speed_squared)
57:       ENDDO
58:     ENDDO
59:   !$OMP END DO
