Select Git revision
LinAlg_SPARSKIT.cpp
SolvingOperations.cpp 127.97 KiB
// GetDP - Copyright (C) 1997-2018 P. Dular and C. Geuzaine, University of Liege
//
// See the LICENSE.txt file for license information. Please report all
// bugs and problems to the public mailing list <getdp@onelab.info>.
//
// Contributor(s):
// Johan Gyselinck
// Ruth Sabariego
//
#include <string.h>
#include <math.h>
#include "GetDPConfig.h"
#include "ProData.h"
#include "ProDefine.h"
#include "ProParser.h"
#include "GeoData.h"
#include "DofData.h"
#include "Cal_Quantity.h"
#include "Cal_Value.h"
#include "MovingBand2D.h"
#include "EigenSolve.h"
#include "Treatment_Formulation.h"
#include "SolvingAnalyse.h"
#include "SolvingOperations.h"
#include "MallocUtils.h"
#include "OS.h"
#include "Message.h"
#if defined(HAVE_GMSH)
#include <gmsh/GmshGlobal.h>
#include <gmsh/PView.h>
#endif
#define TWO_PI 6.2831853071795865
// for performance tests
#if !defined(WIN32)
//#define TIMER
#endif
extern struct Problem Problem_S ;
extern struct CurrentData Current ;
extern int TreatmentStatus ;
extern int Flag_POS ;
extern int Flag_RESTART ;
extern int Flag_BIN, Flag_SPLIT ;
extern char *Name_Generic, *Name_Path ;
extern char *Name_MshFile, *Name_ResFile[NBR_MAX_RES] ;
extern List_T *GeoData_L ;
static int Flag_IterativeLoop = 0 ; /* Attention: phase de test */
struct Group * Generate_Group = NULL;
static int Flag_Break = 0;
// For adaptive time stepper (ugly, I know...)
int Flag_IterativeLoopConverged = 1;
int Flag_IterativeLoopN = 0;
// For IterativeTimeReduction (ugly also...)
int Flag_NextThetaFixed = 0 ;
// For Update
int Init_Update = 0 ;