blob: 197417c7a04ee70d00eb7aa00e727a44e1505df8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
--- grid_thermal_spectral.f90.original 2023-06-17 00:35:03.454061742 +0200
+++ grid_thermal_spectral.f90.new 2023-06-17 00:38:50.641104409 +0200
@@ -110,7 +110,7 @@
T_current = discretization_grid_getInitialCondition('T')
T_lastInc = T_current
T_stagInc = T_current
- dotT_lastInc = 0.0_pReal
+ dotT_lastInc = 0.0_pREAL * T_current
!--------------------------------------------------------------------------------------------------
! initialize solver specific parts of PETSc
|