<commit_before>#include "f2c.h"
#include "netlib.h"
extern double log(double), exp(double), sqrt(double); /* #include <math.h> */

static void calcsc_(integer *type);
static void fxshfr_(integer *l2, integer *nz);
static void newest_(integer *type, doublereal *uu, doublereal *vv);
static void nextk_(integer *type);
static void quad_(doublereal *a, doublereal *b1, doublereal *c, doublereal *sr, doublereal *si, doublereal *lr, doublereal *li);
static void quadit_(doublereal *uu, doublereal *vv, integer *nz);
static void quadsd_(integer *nn, doublereal *u, doublereal *v, doublereal *p, doublereal *q, doublereal *a, doublereal *b);
static void realit_(doublereal *sss, integer *nz, integer *iflag);

/* Common Block Declarations */

struct {
    doublereal p[101], qp[101], k[101], qk[101], svk[101], sr, si, u, v, a, b,
             c, d, a1, a2, a3, a6, a7, e, f, g, h, szr, szi, lzr, lzi;
    real eta, are, mre;
    integer n, nn;
} global_;

#define global_1 global_

/* Table of constant values */
static doublereal c_b41 = 1.;<commit_msg>ERR: Fixed common-block symbol creation for Mac.<commit_after>#include "f2c.h"
#include "netlib.h"
extern double log(double), exp(double), sqrt(double); /* #include <math.h> */

static void calcsc_(integer *type);
static void fxshfr_(integer *l2, integer *nz);
static void newest_(integer *type, doublereal *uu, doublereal *vv);
static void nextk_(integer *type);
static void quad_(doublereal *a, doublereal *b1, doublereal *c, doublereal *sr, doublereal *si, doublereal *lr, doublereal *li);
static void quadit_(doublereal *uu, doublereal *vv, integer *nz);
static void quadsd_(integer *nn, doublereal *u, doublereal *v, doublereal *p, doublereal *q, doublereal *a, doublereal *b);
static void realit_(doublereal *sss, integer *nz, integer *iflag);

/* Common Block Declarations */

static struct {
    doublereal p[101], qp[101], k[101], qk[101], svk[101], sr, si, u, v, a, b,
             c, d, a1, a2, a3, a6, a7, e, f, g, h, szr, szi, lzr, lzi;
    real eta, are, mre;
    integer n, nn;
} global_;

#define global_1 global_

/* Table of constant values */
static doublereal c_b41 = 1.;
{'fraction_non_alphanumeric': 0.1453271028037383, 'fraction_numerical': 0.025233644859813085, 'mean_word_length': 4.817934782608695, 'pattern_counts': {'":': 0, '<': 5, '<?xml version=': 0, '>': 5, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 2, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '3287945', 'n_tokens_mistral': 880, 'n_tokens_neox': 756, 'n_words': 268}