Commit b860c45f authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

sinfo: Added time type.

parent 48deace1
...@@ -3,6 +3,10 @@ ...@@ -3,6 +3,10 @@
* Using CDI library version 1.9.1 * Using CDI library version 1.9.1
* Version 1.9.1 release * Version 1.9.1 release
2017-09-30 Uwe Schulzweida
* sinfo: Added time type
2017-09-28 Uwe Schulzweida 2017-09-28 Uwe Schulzweida
* Changed NFFT from 64 to 8 * Changed NFFT from 64 to 8
......
...@@ -123,11 +123,11 @@ void *Sinfo(void *argument) ...@@ -123,11 +123,11 @@ void *Sinfo(void *argument)
set_text_color(stdout, BRIGHT, BLACK); set_text_color(stdout, BRIGHT, BLACK);
if ( lensemble ) if ( lensemble )
fprintf(stdout, "%6d : Institut Source Steptype Einfo Levels Num Points Num Dtype : ", -(indf+1)); fprintf(stdout, "%6d : Institut Source T Steptype Einfo Levels Num Points Num Dtype : ", -(indf+1));
else if ( nsubtypes > 1 ) else if ( nsubtypes > 1 )
fprintf(stdout, "%6d : Institut Source Steptype Subtypes Levels Num Points Num Dtype : ", -(indf+1)); fprintf(stdout, "%6d : Institut Source T Steptype Subtypes Levels Num Points Num Dtype : ", -(indf+1));
else else
fprintf(stdout, "%6d : Institut Source Steptype Levels Num Points Num Dtype : ", -(indf+1)); fprintf(stdout, "%6d : Institut Source T Steptype Levels Num Points Num Dtype : ", -(indf+1));
if ( operfunc == func_name ) fprintf(stdout, "Parameter name"); if ( operfunc == func_name ) fprintf(stdout, "Parameter name");
else if ( operfunc == func_code ) fprintf(stdout, "Table Code"); else if ( operfunc == func_code ) fprintf(stdout, "Table Code");
...@@ -153,21 +153,25 @@ void *Sinfo(void *argument) ...@@ -153,21 +153,25 @@ void *Sinfo(void *argument)
reset_text_color(stdout); reset_text_color(stdout);
set_text_color(stdout, RESET, BLUE); set_text_color(stdout, RESET, BLUE);
/* institute info */ // institute info
const char *instptr = institutInqNamePtr(vlistInqVarInstitut(vlistID, varID)); const char *instptr = institutInqNamePtr(vlistInqVarInstitut(vlistID, varID));
strcpy(tmpname, "unknown"); strcpy(tmpname, "unknown");
if ( instptr ) strncpy(tmpname, instptr, CDI_MAX_NAME); if ( instptr ) strncpy(tmpname, instptr, CDI_MAX_NAME);
limit_string_length(tmpname, CDI_MAX_NAME); limit_string_length(tmpname, CDI_MAX_NAME);
fprintf(stdout, "%-8s ", tmpname); fprintf(stdout, "%-8s ", tmpname);
/* source info */ // source info
const char *modelptr = modelInqNamePtr(vlistInqVarModel(vlistID, varID)); const char *modelptr = modelInqNamePtr(vlistInqVarModel(vlistID, varID));
strcpy(tmpname, "unknown"); strcpy(tmpname, "unknown");
if ( modelptr ) strncpy(tmpname, modelptr, CDI_MAX_NAME); if ( modelptr ) strncpy(tmpname, modelptr, CDI_MAX_NAME);
limit_string_length(tmpname, CDI_MAX_NAME); limit_string_length(tmpname, CDI_MAX_NAME);
fprintf(stdout, "%-8s ", tmpname); fprintf(stdout, "%-8s ", tmpname);
/* tsteptype */ // timetype
int timetype = vlistInqVarTimetype(vlistID, varID);
fprintf(stdout, "%c ", timetype==TIME_CONSTANT ? 'c' : 'v');
// tsteptype
int tsteptype = vlistInqVarTsteptype(vlistID, varID); int tsteptype = vlistInqVarTsteptype(vlistID, varID);
// clang-format off // clang-format off
if ( tsteptype == TSTEP_INSTANT ) fprintf(stdout, "%-8s ", "instant"); if ( tsteptype == TSTEP_INSTANT ) fprintf(stdout, "%-8s ", "instant");
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment