#include #include #include #include #include #include PetscBool to_bool(const char* str); typedef struct { PetscInt n; long int nnz,npar; long int ntrou,isz; PetscBool FAM1; long int l1[700]; long int l2[700]; long int ktyp[700]; double xjjz[700]; double xjjxy[700]; double xtt[700]; long int nroots; int natom; int s21a1; int s21a2; int s21b1; int s21b2; int s22a1; int s22a2; int s22b1; int s22b2; int s23a1; int s23a2; int s23b1; int s23b2; int postrou; } Data ; void Data_new(FILE* , Data* );