We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 09b67fb + 66ff53d commit 2a10ad3Copy full SHA for 2a10ad3
dcon/dcon.F
@@ -115,6 +115,12 @@ PROGRAM dcon
115
#endif
116
delta_mhigh=delta_mhigh*2
117
use_classic_splines_for_dcon = use_classic_splines
118
+
119
+ IF(nn .EQ. 0)THEN
120
+ WRITE(*,*)"ERROR: nn must be set to a positive integer."
121
+ CALL program_stop("nn must be a positive integer.")
122
+ ENDIF
123
124
c-----------------------------------------------------------------------
125
c open output files, read, process, and diagnose equilibrium.
126
0 commit comments