OpenLLM-France/wikimedia huggingface dataset:
# Ada Programming/Libraries/MultiPurpose/Matreshka

Matreshka is a set on Ada libraries to assist development of information systems. It includes these libraries:

## League

    localization, internationalization and globalization of Ada applications. Key component of the library is efficient implementation of unbounded form of string of Unicode characters. Usual set of base string operations extended by locale dependent operations like case conversion and collation according to Unicode Standard, Unicode Collation Algorithm and Common Locale Database. It includes Unicode compliance regular expression engine, text decoding from large number of encodings and message translation system. Message translation system uses XLIFF format to interchange message translations with translators' tools.

## XML processor

    provides SAX-style API to read and write XML documents. XML1.0 (Fifth Edition), XML1.1 (Second Edition), Namespaces in XML and XML Base Specifications are supported. Strings, files and sockets can be used as input source in blocking or non-blocking mode. Incremental parsing is supported.

## FastCGI

    allows to develop Web applications and to use them with standard HTTP servers (Apache, ISS, for example).

## WebServices

    framework to develop SOAP based web applications. Includes support for WS-Security.

## SQL database access

    provides simple generic API to access SQL databases. Firebird/Interbase, MySQL, Oracle, PostgreSQL, and SQLite3 backends are supported now.

## Ada Modeling Framework

    implementation of Meta Object Facility to work with modeling languages and models. Includes UML, OCL, and UML Testing Profile modules.

## See also

* https://github.com/godunko/matreshka
# Adventist Youth Honors Answer Book/First aid/Pressure points

The usual way to control bleeding is to put pressure directly onto the wound, either with the hand directly or with a dressing of some sort (bandage, handkerchief, tea towel etc.). Do not forget that any wound which is not controlled within a minute or two is a medical emergency; and any deep or large wound must receive medical attention as soon as possible.
It is sometimes not possible to press directly on a wound: for example, there may be a foreign object inside the wound, or a broken bone protruding outside, or the wound may be too large or be inaccessible (e.g. if the limb is trapped by some immovable object). In this case, the only way to control the bleeding is to compress blood vessels over particular pressure points (usually where arteries cross over bones near to the surface of the skin). This technique can be used to control external bleeding from arm wounds and leg wounds.
The correct point is determined by finding a pulse on a victim similar to that felt in the wrist when taking one's own pulse. This point could be located in the wrist, the arm (on the soft underside of the elbow), the groin, or behind the knee. This is the position where a rhythmical pulsation can be felt. Pressure can then be applied over this point—the artery—to control bleeding.
Once an artery is compressed over a pressure point, it must not be compressed for more than 10 minutes: any longer in one go can cause irreversible damage to the limb. Typically pressure would be applied for 10 minutes, then released for a couple, then reapplied and so on.
# Adventist Youth Honors Answer Book/First aid/Smoke fire

In a fire, a person is far more likely to die from smoke inhalation than from exposure to flames. There are two things to remember about smoke: it rises, and if you inhale enough of it, it will kill you. Therefore, if you find yourself in a smoke filled room, get down and crawl. If you can, cover your mouth and nose with a wet cloth to help filter the smoke and keep it from entering your lungs. If water is not available, use a dry cloth - it's better than nothing. Make your way to the door and if it is closed, feel it. If it is hot, do not open it, as this means there is fire on the other side. Try to find another way out such as a window or another exit.
# Adventist Youth Honors Answer Book/First aid/Snake bite
## First aid

Call emergency services as fast as you can .But keep patient calm. Snakebite first aid recommendations vary, in part because different snakes have different types of venom. Some have little local effect, but life-threatening systemic effects, in which case containing the venom in the region of the bite by pressure immobilization is highly desirable. Other venoms instigate localized tissue damage around the bitten area, and immobilization may increase the severity of the damage in this area, but also reduce the total area affected; whether this trade-off is desirable remains a point of controversy.
Because snakes vary from one country to another, first aid methods also vary. As always, this article is not a legitimate substitute for professional medical advice. Readers are strongly advised to obtain guidelines from a reputable first aid organization in their own region, and to be wary of homegrown or anecdotal remedies.
However, most first aid guidelines agree on the following:
* Protect the patient (and others, including yourself) from further bites. While identifying the species is desirable in certain regions, do not risk further bites or delay proper medical treatment by attempting to capture or kill the snake. If the snake has not already fled, carefully remove the victim from the immediate area. If possible, take a photograph of the snake (many cell phones are equipped with cameras). If you do not know what type of snake it is, someone else might be able to identify it from the photo. A poor photo is better than no photo.
* Keep the victim calm. Acute stress reaction increases blood flow and endangers the patient. Keep people near the patient calm. Panic is infectious and compromises judgment.
* Call for help to arrange for transport to the nearest hospital emergency room, where antivenin for snakes common to the area will often be available.
* Elevate the affected limb at a 45° angle to the body to help minimize swelling.
* Do not give the patient anything to eat or drink. This is especially important with consumable alcohol, a known vasodilator which will speed up the absorption of venom. Do not administer stimulants or pain medications to the victim, unless specifically directed to do so by a physician.
* Remove any items or clothing which may constrict the bitten limb if it swells (rings, bracelets, watches, footwear, etc.)
* Keep the victim as still as possible.
* Do not incise the bitten site.
Many organizations, including the American Medical Association and American Red Cross, recommend washing the bite with soap and water. However, do not attempt to clean the area with any type of chemical. Australian recommendations for snake bite treatment strongly recommend against cleaning the wound. Traces of venom left on the skin/bandages from the strike can be used in combination with a snake bite identification kit to identify the species of snake. This speeds determination of which antivenin to administer in the emergency room.

## References

* ↑ Chris Thompson. "Treatment of Australian Snake Bites". Australian anaesthetists' website.
# Adventist Youth Honors Answer Book/First aid/Snow blindness

Exposure to reflected sunlight from snow, ice, or water, even on grey overcast days, can result in sunburn of the tissues comprising the surface of the eye, as well as the retina, producing snow blindness.

## Symptoms

    Symptoms may not be apparent until up to 12 hours after exposure. The eyes initially feel irritated and dry; then, as time passes, eyes feel as though they are full of sand. Blinking and moving the eyes may be extremely painful. The eyelids are usually red, swollen, and difficult to open.

## Remedial Action

    A mild case will heal spontaneously in a few days, but you can obtain some relief by applying cold compresses and a lightproof bandage. An ophthalmic ointment can be applied hourly to relieve pain and lessen the inflammatory reaction.

## WARNING

    Do not rub your eyes.
# Adventist Youth Honors Answer Book/First aid/Splints

An essential part of the first-aid treatment is immobilizing the injured part with splints so that the sharp ends of broken bones won’t move around and cause further damage to nerves, blood vessels, or vital organs. Splints are also used to immobilize severely injured joints or muscles and to prevent the enlargement of extensive wounds.
Before you can use a splint, you need to have a general understanding of the use of splints. In an emergency, almost any firm object or material can be used as a splint. Such things as umbrellas, canes, tent pegs, sticks, oars, paddles, spars, wire, leather, boards, pillows, heavy clothing, corrugated cardboard, and folded newspapers can be used as splints. A fractured leg may sometimes be splinted by fastening it securely to the uninjured leg. Splints, whether ready-made or improvised, must meet the following requirements:
* Be light in weight, but still be strong and fairly rigid.
* Be long enough to reach the joints above and below the fracture.
* Be wide enough so the bandages used to hold them in place won’t pinch the injured part.
* Be well padded on the sides that touch the body. If they’re not properly padded, they won’t fit well and won’t adequately immobilize the injured part.
* To improvise the padding for a splint, use articles of clothing, bandages, cotton, blankets, or any other soft material.
* If the victim is wearing heavy clothes, apply the splint on the outside, allowing the clothing to serve as at least part of the required padding.
Although splints should be applied snugly, never apply them tight enough to interfere with the circulation of the blood. When applying splints to an arm or a leg, try to leave the fingers or toes exposed. If the tips of the fingers or toes become blue or cold, you will know that the splints or bandages are too tight. You should examine a splinted part approximately every half-hour, and loosen the fastenings if circulation appears to be cut off. Remember that any injured part is likely to swell, and splints or bandages that are all right when applied may be too tight later.
To secure the limb to the splint, belts, neckerchiefs, rope, or any suitable material may be used. If possible, tie the limb at two places above and two places below the break. Leave the treatment of other types of fractures, such as jaw, ribs, and spine, to medical personnel. Never try to move a person who might have a fractured spine or neck. Moving such a person could cause permanent paralysis. Don’t attempt to reset bones.
# Adventist Youth Honors Answer Book/First aid/Rescue breathing

* If the patient is breathing, do not administer rescue breathing. Rescue breathing is an emergency treatment that may help the victim regain the ability to breathe on his own.
* Tilt the victim's head back, and lift their chin (head-tilt chin-lift). The head will not remain in this position by itself, you must maintain the head-tilt chin-lift throughout.
    In certain cases, you may not be able to give rescue breaths through the mouth - blow into the nose and seal the mouth instead.
* Pinch the victim's nose
* Put your mouth on the mouth of the victim, maintaining a good seal, and blow into the mouth. These breaths should be gentle and last no longer than 2 seconds to prevent air from entering the stomach.
When you have given two rescue breaths, begin chest compressions if you are trained to do so. Otherwise, continue with rescue breathing: 2 breaths every 5 seconds.
If the victim has recovered spontaneous respiration, put him in the recovery position, cover him, and monitor his breathing on a regular basis until an ambulance arrives.
# Adventist Youth Honors Answer Book/First aid/Shock

Shock is a medical condition where the delivery of oxygen and nutrients is insufficient to meet the body's needs. The main carrier of oxygen and nutrients in the body is the blood, so anytime there is a loss of blood, there is a risk of shock.
First aid treatment of shock includes:
* Immediate reassurance and comforting the victim if conscious.
* If alone, go for help. If not, send someone to go for help and someone stay with the victim.
* Ensure that the airway is clear and check for breathing. Place the victim in the recovery position if possible.
* Attempt to stop any obvious bleeding.
* Cover the victim with a blanket or jacket, but not too thick or it may cause a dangerous drop in blood pressure.
* Do not give a drink. Moisten lips if requested.
* Prepare for cardiopulmonary resuscitation (CPR).
# Adventist Youth Honors Answer Book/First aid/Spider bites

Spiders in the United States are generally harmless, with several exceptions. The most notable are the black widow and brown recluse spiders. Their bites are serious but rarely fatal.
Bites by non-poisonous spiders should be treated the same as insect bites. Bites by poisonous spiders should be treated as follows:
* Place ice over the bite to reduce pain.
* Hospitalize victims who are under 16 or over 65 for observation.
* Be prepared to give antivenin in severe cases.
# Adventist Youth Honors Answer Book/First aid/Shoulder drag

The shoulder drag is accomplished by placing the victim in a supine position (laying on his back), grasping the clothing behind his shoulders, and dragging him in the desired direction.
# Adventist Youth Honors Answer Book/First aid/Signaling aircraft

Make a distress signal
Make a distress signal on the ground by piling rocks, branches, or other debris to form large letters spelling "S.O.S." This is the universally recognized signal for help. Try to use materials that contrast with the surrounding environment. In winter, you may be able to stomp an SOS into the snow. Make the letters read from east to west (or west to east) so that the shadows catch the letters better.
Light three fires
You may also light three fires to signal for help. Build them either in a line or in a triangle, and get them good and hot. When you see a rescue plane during daylight hours, add green plant matter to the flames. This should cause thick smoke. Be careful to not extinguish the fire by doing this.
Signaling mirror The emergency signaling mirror is approximately 3 by 5 inches and consists of an aluminized reflecting glass mirror, a back cover glass, and a sighting device. It is used to attract the attention of passing aircraft or ships by reflection, either in sunlight or in hazy weather. The reflections of this shatterproof mirror can be seen at a distance of 30 miles at an altitude of 10,000 feet. Though less effective, and with possible shorter range, mirror flashes can also be seen on cloudy days with limited visibility. To use the mirror, proceed as follows:
* Punch a cross-hole in its center.
* Hold the mirror about 3 inches in front of your face and sight through the cross at the ship or aircraft. The spot of light shining through the hole onto your face will be seen in the cross-hole.
* While keeping a sight on the ship or aircraft, adjust the mirror until the spot of light on your face disappears in the hole. The bright spot, seen through the sight, will then be aimed directly at the search ship or aircraft.
# Annotated King Reference Manual/Expressions

This page is work in progress.

## Attributes
### Examples
### Discussion

Attribute functions can have multiple arguments, which need not be static. Consider 'Image for numeric types, with such parameters as Width, Base, ...
-> I was wondering also about Ada. I guess that attribute functions are deferencing just by the identifier as a function name and then the function signature applies. (PP)
It should probably be
identifier [actual_parameter_part]
Changed. (PP)

## Sequence Aggregates
### Examples
### Discussion

others is only allowed for bounded sequences. I don't recall if it is part of discrete choice list, but it should be allowed in named associations for bounded sequences.
-> I can't figure out how to define a bounded sequence. Any example? (PP)
I've decided to eliminate bounded sequences
Aggregates of a single value are allowedː S'[7]
named_sequence_aggregate seems to have 2 choices that are the same (JC)
Changed. (PP)

## Set Aggregates
### Rationale

all is only allowed if the universe type is discrete and finite.

### Discussion

Actually, others makes no sense for set aggregates. Sorry
Aggregates with a single value are allowedː S'̪7ˈ(JC)
Changed. (PP)

## Expressions
### Discussion

Remember that King allows a unary operator to follow a binary operator without parenthesesː 10.0 ^ -9. I don't think these rules allow that.
-> Changed. (PP)
Seems that A * -B is still not OK (JC)
Decomposition:
factor multiplying_operator factor
factor -> primary -> A
multiplying_operator -> *
factor -> unary_adding_operator primary -> -B
Is it correct? (PP)

## Operators
### Discussion

Unary operators, including not, have the highest precedence, to allow unary operators to follow binary operators without parentheses. Don't forget the "\" unary operator.
-> Changed. (PP)
All unary operators have highest precedence. You need something like
binary_adding_operator
multiplying_operator
exponentiation_operator ::= ^
highest_precedence_operator
with all the unary operators part of highest_precedence_operator (JC)

## Declare Expressions
### Examples
### Discussion

The declarations of a declare expression are limited to constants and subtypes. You dealt with this already elsewhere IIRC.
Note added. (PP)
Does not include subtypes (JC)
Changed. (PP)
# Annotated King Reference Manual
## Contents

* Introduction
* Definitions
* Lexical Elements
* Types
* Declarations
* Expressions
* Statements
* Bodies
* Program Structure
* Modules and Macro
* Tasks
* Aspects
* Predefined Environment
# Annotated King Reference Manual/Declarations

This page is work in progress.

## Declarations
### Rationale

Inside basic_declaration, defining_program_unit_name shall be only an identifier.
The mention of parent_unit_name may appear only at library level. It is provided here as some declarations apply at library level.

### Discussion
## Type Declarations

See section Types.

## Statement Procedure Declarations
### Examples
### Rationale

Inner declared objects can only be constant declarations.

### Discussion
## Renaming Declarations
### Examples
### Rationale

The subtype of renaming object must be the same as for the renamed object.
Renaming a constant object shall include the reserved word constant, on the contrary variable object shall not.
Use a new name value for renaming a named value. Use a new subtype name for renaming a subtype.
# Annotated King Reference Manual/Introduction

King is a high-level, strongly typed, general-purpose language for engineering software. The content of this wikibook is based on the original work available at King repository.
As this work is on going, the present wikibook should rather be titled the "Incomplete Annotated King Reference Manual".
The main objective of this wikibook is to provide some formalization of King programming language and its programming environment. Thus, future tool designs, librairies and so on may rely on strong detailed and annotated définitions.
One side objective is to submit language definition discussions in order to elaborate some language enhancements. For this purpose, for each definition, a discussion section is available to collect proposals. When agreed these proposals may be applied to the definition. It is understood that until these new definitions are included in the original work, they cannot be considered part of the King language.
# Annotated King Reference Manual/Bodies

This page is work in progress.
# Annotated King Reference Manual/Definitions
## Characters

A King compilation unit is a sequence of lines; a line is a sequence of Unicode characters.
Some character subsets are named :
* letter_lowercase : ASCII lowercase letters a .. z
* letter_uppercase : ASCII uppercase letters A .. Z
* number_decimal : ASCII digits 0 .. 9
* graphic_character : any character with an associated character literal
* underline : ASCII _

## Syntax Notation

The form of a King program is described by a formal syntax and semantic rules.
The chosen formal syntax is broadly inspired by Ada RM section 1.1.4 "Method of Description and Syntax Notation".
One change is that terminal symbols are represented in bold (not surrounded by ').

## Attributes

* Provide access to basic information about a subtype or value of a subtype: 'First, 'Position, 'range ...
* Provide basic functionality related to a subtype: 'Image, 'Value, 'Finalize ...

## Aspects

Aspects specify properties of an entity: Overflow_Checking, Default_Initial_Condition ...

## Operations

Primitive subprograms: Length, Is_Empty, Clear ...
# Annotated King Reference Manual/Lexical Elements
## Lexical Elements
### Items

Each lexical element is formed from a sequence of characters, and is either a delimiter, an identifier, a reserved word, a numeric_literal, a character_literal, a string_literal, or a comment.
The text of a compilation is divided into lines.
Separators code points are: 16#20# (SPACE, except within a comment, a string_literal, or a character_literal), 16#0A# (LINE FEED), 16#0D# (CARRIAGE RETURN).

### Rationale

A compilation is a sequence of lines, conceptually terminated by a line terminator. King does not specify what character(s), if any, make up a line terminator in a compilation text. Common text file formats on the kinds of systems that King is intended to be used on use one or two characters (CR, LF) as line terminators, so this is probably correct in practice (if King is ever implemented).

### Discussion
## Identifiers
### Examples
### Syntax

Once built as above, specifics rules (see TBD) are enforced to define a valid identifier.

### Rationale

An identifier is made up of words separated by underlines. There is an initial word and zero or more subsequent words. The initial word must begin with a capital letter. Subsequent words can begin with a capital letter or a digit.

### Discussion
## Reserved Words
### List

all and
begin body
case constant
declare delta digits
else else_if end exit
for function
hidden
if in is
loop
macro map module
new not null
of or others out
procedure
range record renames return reverse
select separate sequence set some subtype
task then type
use
wait when with
xor

### Discussion
## Numeric Literals
### Discussion
## Character Literals
### Discussion
## String Literals
### Examples

(See expressions for examples of building strings with quotation mark)
# BlitzMax/Modules/Miscellaneous/ZLib compression

This module wraps the zlib compression library. See zlib Manual: Utility Functions for more information.

# Functions
## compress

Function compress( dest:Byte Ptr,dest_len Var,source:Byte Ptr,source_len )
Description: Compress a block of data at default compression level

## compress2

Function compress2( dest:Byte Ptr,dest_len Var,source:Byte Ptr,source_len,level )
Description: Compress a block of data at specified compression level

## uncompress

Function uncompress( dest:Byte Ptr,dest_len Var,source:Byte Ptr,source_len )
Description: Uncompress a block of data