Scientific Pascal

@scipastips.bsky.social

115 Followers 97 Following

Applications of the #Pascal #programming language in #science, #research, #medicine and #technology. Semi-automated & curated by J. W. Dietrich (@drjwdietrich.bsky.social)

Screenshot of a parameter editor in SimSEE.
Figure from the paper: Enhanced Calibration Editor in MEGA 12.1. The Calibration Editor (A) displays an interactive tree of great apes, with several tip names already mapped to NCBI IDs. Scientific names for mapped IDs are shown next to tip names in angle brackets, and applied constraints are shown next to circled nodes. The Quick Help dialog (B) provides brief instructions for defining calibration constraints using either the TimeTree RESTful API or manually. Users can right-click a tip or node in the tree to open the context menu (C) to make TTDB queries for the selected element. The NCBI ID Search dialog (D) is used to map tip names in the tree to NCBI Identifiers used by TTDB. After at least two tip names are mapped to identifiers, time estimates for the MRCA of mapped tip names can be retrieved from TTDB using the Divergence Time Search dialog (E). Calibrations derived from the TimeTree resource can be applied as a uniform density distribution, a minimum time constraint, a maximum time constraint, or a fixed time. A list of studies used for deriving a TTDB time estimate can be retrieved by clicking the Details for studies button.
Screenshot of Nest-o-patch.
Screenshot of Lazarus 4.6.0 on macOS 13.7.6.
Screenshot of Trndi on Fedora Linux, showing a glucose concentration of 10.8 mmol/l
Figures from the defining paper showing the hyperbolic relationship between insulin sensitivity and pancreatic beta-cell function, based on computer simulations in Object Pascal and statistical evaluation of big datasets.
Silverleaf whitefly on a green surface. Source: https://commons.wikimedia.org/wiki/File:Silverleaf_whitefly.jpg
Figure from the paper: Time-frequency plots per condition, with the baseline corrected oscillatory power measures. The upper four subplots are from a cluster of mid-frontal channels (Fz, F1, F2, FC1, FC2) and the lower five subplots are from a posterior channel cluster (PO3, POz, PO4, O1, Oz, O2). The events (onsets of memory array, interruption, retro-cue, and probe) are marked by vertical dotted lines, and their timing changes depending on condition. Mind that flexible condition subplots have a white shaded area around 4000 ms, which represent the 95% confidence interval range of resumption times on flexible trials (95%CI 3699.4 - 4682.95).
Figure from the paper: Command palette during the search of blocks by their contents.
Graphical Abstract. As a replacement subsequently follows the abstract: (1) Background: Individuals with high levels of state depression are hypothesized to have an impairment of attentional control functions necessary for filtering irrelevant information. This study used the event-related potential of early PD, a marker of distractor suppression, and N2pc, an indicator of attentional capture to investigate whether high state depression affects selective attention in ignoring or suppressing distractors. (2) Methods: Thirty-three undergraduate students completed the Depression Anxiety Stress Scale-21 (DASS-21) and performed a modified, delayed match-to-sample task. Participants encoded abstract shapes under low or high perceptual load conditions in the visual working memory while ignoring a lateralized Chinese character as a task-irrelevant singleton distractor. (3) Results: Individuals with high state depression failed to suppress the distractor, as evidenced by the absence of early PD. Under low perceptual loads, they also displayed a significant N2pc component, indicating attentional allocation to the distractor. In contrast, low-state-depression participants successfully suppressed the distractor, showing early PD and the absence of N2pc. (4) Conclusions: These findings suggest that high-state-depression individuals have an impairment in top–down attentional control, particularly in feature-based selective attention. This deficit hinders the ability to filter out irrelevant information, potentially contributing to cognitive difficulties associated with depression.
Examples for key matrices.
Figure from the paper: Two-dimenstional plot showing zones of saturation/nonsaturation of the skeleton surface by impurity particles that are formed for different values of the filter thickness at v= 4.5.
Figure from the paper showing the experimental paradigm. Shortly, participants were asked to memorize the orientation of coloured bars before being presented with an arithmetic task.
Picture of the illuminated Niagara Falls at night. Seen are the Niagara River in the front, the falls in the center, and the city in the background.
Screenshot of the Pascal Magazin.
PASTA/80. Mascot logo with pasta coming out of a package with the inscription "PASTA/80 – Z80 PACAL TO ASSEMBLY"
Add for Apple's Pascal, ca. 1979. Text and image on paper, with the option to iron an image on a t-shirt. From the text: "Apple lets you get personal with Pascal. There's only one logical way to find out what a person wants in a personal computer. Ask the person who'll be using one. At Apple, we've been very successful at identifying just what people look for in com-puters. And then providing them with it. In spades. For serious enthusiasts, this means making available sophisticated innovations that are often conspicuously absent from other personal computers. Like Pascal. Apple II is one of the few personal computers that has it. And when you turn this page and feast vour eves on the many advantages this level, general-purpose language has to offer, you'll see why that's very good news indeed. When you've got it, flaunt it. If you'd like to let the world know who speaks Pascal, here's how: Follow the dotted line and cut out the transfer image above Preheat iron dry-woo setting) tor 3 minutes. Slip garment on ironing board over scrap material. Remove wrinkles. Position transfer face down and pin edges to ironing board cover. Iron transfer slowly too hot. vet transter coo for one minute. then undin and slowiv on transter straight un. Results are best wher oshirt is at least 50% polvester."
Symbolic description of the International Pascal User Group (IPUG) with a picture of Blaise Pascal's head, a rainbow, and icons for Lazarus and Delphi. From the text: "We are introducing the International Pascal User Group membership: IPUG. Objective: support for the FOUNDATION SUPPORT PASCAL (FSP) (St. Ondersteuning Programmeertaal Pascal, Netherlands, affiliated with the Blaise Pascal Magazine which is part of this Dutch foundation)"
The Apple Pascal Poster. This poster depicts graphically the Syntax of the Pascal programming language. Coloured line graphic on a black background.
Screenshot from index.dev: Delphi/Object Pascal is making a comeback. Moved from #12 to #9, showing a noticeable jump. This could indicate: A resurgence in legacy applications requiring maintenance. A niche but loyal developer base keeping it alive.
Banner image of the 2025 Pascal Conference with portraits of the invited keynote speakers.
Title page of the Blaise Pascal Magazine #126
Screenshot of the Lazarus IDE 4.2 on macOS Ventura 13.7
Parts of the source code of SPINA Carb, written in Object Pascal.
Title page of issue 125 of the Blaise Pascal Magazine
Title page of the issue 123/124 of the Blaise Pascal Magazine
Screenshot of Lazarus 4.0 on macOS 13.7.5 Ventura.
Screenshot of MacPaint 1.5 (1985)
Screenshot of the web site of this article, showing more than 2000 citations.
Screenshot of the MRIcron user interface on macOS. The main menu provides access to core functions. Users can change the crosshair position by clicking on the image or setting the coordinates in the top toolbar, allowing users to specify the crosshair coordinates (with X, Y, Z referring to the column, row and slice of the image). The title bar reports the crosshair location in world space as well as the voxel intensity. Likewise, users can set contrast and brightness by dragging over the image or using the minimum and maximum thresholds in the titlebar. A pull-down menu allows the user to select the color scheme (here Grayscale). Buttons in the toolbar allow the user to display a gradient colorbar and draw lesions. The bottom status bar reports recent changes (here the new contrast values).
Illustriation for CAI
Bill Atkinson (black and white portrait from about 1985)
Figure: Benchmarking results of code generated in five different programming languages (S/R, Python, Swift, C++ and Object Pascal) for simulation of two different types of feedback control systems. Object Pascal generates the by far fastest code.
Table: Pareto-optimal sets of programming languages. Concerning time & memory, energy & memory and energy & time & memory, Pascal is in the top group.
Screenshot of the Lazarus IDE 3.6 on macOS 13.6.9
Another periodic table of programming languages
Periodic table of programming languages
The unilateral hydrodynamic model proposed by Czosnyka
Screenshot of Lazarus 3.2.0 on macOS Ventura 13.6.4
BLAISE PASCAL CAFE in IJsselstein NETHERLANDS Saturday 6th of April 2024 Lunch Sandwiches, Coffee and Soft drinks included there is Program Spring Event– Pascal Café IJsselstein Netherlands 6 April 2024 Tel/Mob: +31 6 21 23 62 6868 https://www.blaisepascalmagazine.eu/product/14233/ Early bird price € 50 valid until 1 april 2024 https://www.blaisepascalmagazine.eu/international-lazarus-conference-in-holland-april-2024/
Cover of Blaise Pascal Magazine 114/115
Cover of issue #113 of the Blaise Pascal Magazine
Cover of the Blaise Pascal Magazine #112
Obituary for Howard Page Clark
Cover of issue 110/111 of the Blaise Pascal Magazine
Original add for the Apple Macintosh from 1984. "Introducing Macintosh. For the rest of us."
Excerpt of the source code: type tTwoWaySensTable = array of array of TState; function TwoWayTable(const xmin, xmax, ymin, ymax, resolutionx, resolutiony: real; const StrucPars: tParameterSpace; modX, modY: TParameter): tTwoWaySensTable; implementation function TwoWayTable(const xmin, xmax, ymin, ymax, resolutionx, resolutiony: real; const StrucPars: tParameterSpace; modX, modY: TParameter): tTwoWaySensTable; var i, j, k: integer; maxi, maxj: integer; params: tParameterSpace; prediction: TPrediction; begin params := StrucPars; prediction := PredictedEquilibrium(P0, 0, Z0, params); if prediction[0].G > 0 then k := 0 else K := 1;
Lazarus IDE 3.0.0 on macOS 13.6.3