diff options
Diffstat (limited to 'src/Dissipation_4_3_min_err_coeff_alt.F90')
| -rw-r--r-- | src/Dissipation_4_3_min_err_coeff_alt.F90 | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/Dissipation_4_3_min_err_coeff_alt.F90 b/src/Dissipation_4_3_min_err_coeff_alt.F90 index d40ff67..c2e34ba 100644 --- a/src/Dissipation_4_3_min_err_coeff_alt.F90 +++ b/src/Dissipation_4_3_min_err_coeff_alt.F90 @@ -710,26 +710,26 @@ contains integer, parameter :: wp = kind(zero) sigma(1,1) = 4.186595370392226897362216859769846226369_wp - sigma(2,1) = 0_wp - sigma(3,1) = 0_wp - sigma(4,1) = 0_wp - sigma(5,1) = 0_wp - sigma(1,2) = 0_wp + sigma(2,1) = 0.0_wp + sigma(3,1) = 0.0_wp + sigma(4,1) = 0.0_wp + sigma(5,1) = 0.0_wp + sigma(1,2) = 0.0_wp sigma(2,2) = 0.6725191921225620731888714836983116420871_wp sigma(3,2) = 0.3613418181134949259370502966736306984367_wp sigma(4,2) = -0.2021316117293899791481674539631879662707_wp sigma(5,2) = 0.03455320708729270824077678274955265350304_wp - sigma(1,3) = 0_wp + sigma(1,3) = 0.0_wp sigma(2,3) = 0.3613418181134949259370502966736306984367_wp sigma(3,3) = 0.7206133711630147057720442098623847362950_wp sigma(4,3) = 0.1376472340546569368321616389764958792591_wp sigma(5,3) = -0.04136405531324488624637892257286207044784_wp - sigma(1,4) = 0_wp + sigma(1,4) = 0.0_wp sigma(2,4) = -0.2021316117293899791481674539631879662707_wp sigma(3,4) = 0.1376472340546569368321616389764958792591_wp sigma(4,4) = 0.9578653607931026822074133441449909689509_wp sigma(5,4) = 0.02069353627247161734563597102894256809696_wp - sigma(1,5) = 0_wp + sigma(1,5) = 0.0_wp sigma(2,5) = 0.03455320708729270824077678274955265350304_wp sigma(3,5) = -0.04136405531324488624637892257286207044784_wp sigma(4,5) = 0.02069353627247161734563597102894256809696_wp |