Changeset 71 for trunk/src/sinobad.d

Timestamp:

09/28/11 16:47:04 (13 years ago)

Author:

jbrlod

Message:

can restart from any restart (including kt>0)

File:

• trunk/src/sinobad.d (modified) (4 diffs)

trunk/src/sinobad.d

@@ -1 +1 @@
 //defval K_NEU
 //#define FZIMP
-#define FILTER
-#define FILZNOL
+//#define FILTER
+//#define FILZNOL
 //#define FILLNOZ
 //#define SOLSORYAO
@@ -19 +19 @@
 defval NZ      31 
 defval NMAX    800 //    !  maximum of iterations for the SOR solver
-defval TA      50 |__DATE__ | number of time steps
+defval TA      101 |__DATE__ | number of time steps
 defval TU       2 | start time step
 #ifdef FILTER
@@ -54 +54 @@
 //#OPTION ----------------------------------------------OPTION
 
-option    O_M1QN3 | M2QN1 
+//#option    O_M1QN3 | M2QN1 
+option O_M1QN3
 //#option O_VARINCR
-option    O_GRADTEST
-option   O_DBG_NANF
+//#option    O_GRADTEST
+//#option   O_DBG_NANF
 //#option   O_DBG_TING
 option  O_EXTOBJ "../object/ncutil.o"
@@ -1219 +1220 @@
 insert_fct arg xinitnc
 insert_fct arg init_euler
+insert_fct arg init_kt
 //#insert_fct  arg load_shape_func
 //#insert_fct  arg load_stdev_pca