newmen

; bridge
(defn find [anchor]
  (if (is anchor 3)
    (if (havent anchor BRIDGE 3)
      (def nbrs (cross_110 (crystal anchor) anchor))
      (if (and (all nbrs) (is nbrs[0] 6) (is nbrs[1] 6)
            (has_bond anchor nbrs[0]) (has_bond anchor nbrs[1]))
        (def atoms [anchor nbrs[0] nbrs[1]])
        (create BRIDGE atoms)))))

newmen

# Описываем используемые хим. элементы и их валентность
elements
  atom H, valence: 1
  atom C, valence: 4

# Описываем используемые крист. решётки и структуры, состоящие из атомов описанных
# выше. Поверхностные структуры не могут состоять из одновалентных атомов. Конечное
# валентное состояние атомов структур задаваемых в этом разделе, определяется при
# описании уравнений реакций кинетической схемы (см. ниже).
surface

newmen

#include <iostream>

///////////////////////////////////////////////////////////////////////////////

class Base
{
protected:
    Base() {}

public:

newmen

`gem list`.split("\n").each do |line|
  next if line == ''
  name = line.scan(/^\S+/).first
  versions = line.scan(/\(([^\)]+)\)/).first.first.split(', ')
  versions.shift
  unless versions.empty?
    versions.each do |version|
      `gem uninstall #{name} -v #{version} --force`
    end
  end

newmen

#include <assert.h>
#include <chrono>
#include <iostream>
#include <omp.h>
#include <random>
#include <vector>

using namespace std;

#define Nx 50