MihailJP

-- Functions for statistics

import Data.List

-- Averages
average p = (sum p) / (fromIntegral $ length p) -- arithmetic mean
geomean p = (product p) ** (1.0 / (fromIntegral $ length p)) -- geometric mean
harmean p = (fromIntegral $ length p) / (sum $ map (\x -> 1.0 / x) p) -- harmonic mean
rms     p = sqrt $ average $ map (\x -> x * x) p -- quadratic mean (RMS)

MihailJP

#include <time.h>
signed long getTZ ()
{
    struct tm* timeStruct;
    time_t timeValBase = 86400; /* I know an implementation in which time_t is unsigned */
    time_t timeVal;

    timeStruct = gmtime(&timeValBase); /* parse as the universal time */
    timeVal = mktime(tp); /* intentionally treat as the local time in order to find the time zone */

MihailJP

<NotepadPlus>
    <UserLang name="Scala" ext="scala" udlVersion="2.0">
        <Settings>
            <Global caseIgnored="no" allowFoldOfComments="no" forceLineCommentsAtBOL="no" foldCompact="no" />
            <Prefix Keywords1="no" Keywords2="no" Keywords3="yes" Keywords4="no" Keywords5="no" Keywords6="no" Keywords7="no" Keywords8="no" />
        </Settings>
        <KeywordLists>
            <Keywords name="Comments" id="0">00// 01 02 03/* 04*/</Keywords>
            <Keywords name="Numbers, additional" id="1"></Keywords>
            <Keywords name="Numbers, prefixes" id="2">0x</Keywords>

MihailJP

#pragma once

#include <stdexcept>

// Calculate GCD (for reduction)
template<typename T> T gcd(T x, T y) {
	// Euclidean algorithm
	T val1 = (x < y) ? y : x, val2 = (x < y) ? x : y;
	T* m = &val1; T* n = &val2; T* tmpptr = nullptr;
	while (true) {

MihailJP

diff -ru paco-2.0.9/gpaco/gconfig.h paco-2.0.9-newglib/gpaco/gconfig.h
--- paco-2.0.9/gpaco/gconfig.h  2010-06-26 04:51:00.000000000 +0900
+++ paco-2.0.9-newglib/gpaco/gconfig.h  2013-01-08 13:03:12.497896388 +0900
@@ -11,7 +11,7 @@
 
 #include "paco/baseconfig.h"
 #include <glibmm/ustring.h>
-#include <glib/gkeyfile.h>
+#include <glib.h>
 #include <vector>

MihailJP

<NotepadPlus>
    <UserLang name="HSP" ext="hsp as" udlVersion="2.0">
        <Settings>
            <Global caseIgnored="yes" allowFoldOfComments="no" forceLineCommentsAtBOL="no" foldCompact="no" />
            <Prefix Keywords1="no" Keywords2="no" Keywords3="no" Keywords4="no" Keywords5="no" Keywords6="no" Keywords7="no" Keywords8="no" />
        </Settings>
        <KeywordLists>
            <Keywords name="Comments" id="0">00// 00; 01 02 03/* 04*/</Keywords>
            <Keywords name="Numbers, additional" id="1"></Keywords>
            <Keywords name="Numbers, prefixes" id="2">0x 0b $ %</Keywords>

MihailJP

<?xml version="1.0" encoding="UTF-8"?>
<language name="Hot Soup Processor" section="Sources" version="1.01" extensions="*.hsp;*.as" kateversion="3.9">
  <highlighting>
    <list name="keywords">
      <item> await </item>
      <item> break </item>
      <item> continue </item>
      <item> else </item>
      <item> end </item>
      <item> exec </item>

MihailJP

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE language SYSTEM "language.dtd" [
<!ENTITY picsig "\bPIC(TURE)?(\s+IS)?\s+">
<!ENTITY verbs "\b(((END-)?(ACCEPT|ADD|CALL|COMPUTE|DELETE|DISPLAY|DIVIDE|EVALUATE|IF|MULTIPLY|PERFORM|READ|RECEIVE|RETURN|REWRITE|SEARCH|START|STRING|SUBTRACT|UNSTRING|WRITE))|ALTER|ASSIGN|CHAIN|CLOSE|CONTINUE|CONTROL|COPY|COUNT|ELSE|ENABLE|ERASE|EXIT|GENERATE|GO|GOBACK|IGNORE|INITIALIZE|INITIATE|INSPECT|INVOKE|MERGE|MOVE|OPEN|RELEASE|REPLACE|RESERVE|RESET|REWIND|ROLLBACK|RUN|SELECT|SEND|SET|SORT|STOP|SUM|SUPPRESS|TERMINATE|THEN|TRANSFORM|UNLOCK|UPDATE|USE|WAIT|WHEN)\b(?!-)">
<!ENTITY usages "\b(BINARY|BINARY-C-LONG|BINARY-CHAR|BINARY-DOUBLE|BINARY-LONG|BINARY-SHORT|COMP|COMP-1|COMP-2|COMP-3|COMP-4|COMP-5|COMP-X|COMPUTATIONAL|COMPUTATIONAL-1|COMPUTATIONAL-2|COMPUTATIONAL-3|COMPUTATIONAL-4|COMPUTATIONAL-5|COMPUTATIONAL-X|FLOAT-BINARY-16|FLOAT-BINARY-34|FLOAT-BINARY-7|FLOAT-DECIMAL-16|FLOAT-DECIMAL-34|FLOAT-EXTENDED|FLOAT-LONG|FLOAT-SHORT|FUNCTION-POINTER|INDEX|NATIONAL|PACKED-DECIMAL|PO

MihailJP

#include <iostream>

using std::cout; using std::endl;

// A class whose instance will be included as a member of a monostate class
class CContent {
public:
    CContent() {cout << "CContent constructor" << endl;}
    ~CContent() {cout << "CContent destructor" << endl;}
    void speak() {cout << "Bonjour le monde !" << endl;}

MihailJP

class Parent {
	static final int Val = 1;
	public int getval() {
		return Val;
	}
}

class Child extends Parent {
	static final int Val = 2;
}