Update Input.f90

Correction of units in the error message which occurs when the electron temperature is smaller than the Fermi temperature in the plasma
michaeltouati · Mar 19, 2024 · 85100ca · 85100ca
1 parent 76299f3
commit 85100ca
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/sources/Input.f90 b/sources/Input.f90
@@ -230,7 +230,7 @@ subroutine read_init_parameters
       write(*,*)'The plasma temperature T_ini must be greater than the Fermi temperature :'
       if (Tmin_alert) write(*,*)'because the electrical resistivity is not yet implemented for this plasma'
       if (Tmin_alert2) write(*,*)'because the electrical resistivity is not yet implemented for this tracer'
-      write(*,*) 'T_ini =',T_ini,'eV while T_F = ',Tfermi(Z0, ni0)/eV,' eV'
+      write(*,*) 'T_ini =',T_ini/eV,'eV while T_F = ',Tfermi(Z0, ni0)/eV,' eV'
       stop
     end if
 
@@ -394,4 +394,4 @@ function get_char(str)
     return
   end function get_char
 
-end module input
+end module input