rinx

import System.Random.Mersenne

np  = 1000000
tau = 1.0 -- cloud optical thickness
sal = 0.5 -- surface albedo
omg = 1.0 -- single scattering albedo
zu  = tau -- atmosphere upper boundary
zb  = 0.0 -- atmosphere lower boundary

rinx

module Main exposing (..)

import Html exposing (..)
import Html.Events exposing (..)
import Html.Attributes exposing (..)

type alias Model = Int
type Msg = Click

rinx

type ZipList = [(Double, Double)]

-- akima interpolation
akimaint :: ZipList -> Double -> Maybe Double
akimaint zls x = akimacore zls' x
    where
        zls' = zlistsort zls
        zls'' = selzls zls' n n2
        xls = map fst zls'

rinx

\begin{figure}[htbp]
    \centering
    \tikzset{%
        every channel/.style={
        rectangle,
        draw,
        draw=black,
        fill=white,
        minimum size=1cm,
    },

rinx

#!/bin/sh

CMDNAME=`basename $0`
BASE_DIR=$(cd $(dirname $0);pwd)

image_list=(${BASE_DIR}/*.jpg)
numimglist=${#image_list[@]}
rannum=$(( $RANDOM % ${numimglist}))
image_path=${image_list[$rannum]}

rinx

# -*- coding: utf-8 -*-

# hist_gp.rb
#
# Author: Rintaro Okamura
#
# Description:
#   Histogram libraries for ruby using gnuplot gem
#

rinx

\documentclass[a4j, 12pt, titlepage]{ltjreport}
%\documentclass[a4j, 12pt, titlepage]{jreport}

\usepackage[top=20truemm,bottom=20truemm,left=20truemm,right=20truemm]{geometry}
\usepackage{graphicx}
\usepackage{tikz}
\usetikzlibrary{automata,positioning}

\makeatletter

rinx

rinx

--
-- 🍣-soku-enzan.hs
--

(🍣)                = (+)
(🍣🍣)           = (-)
(🍣🍣🍣)      = (*)
(🍣🍣🍣🍣) = (/)

main :: IO ()

rinx

require 'csv'

  filename = "test.tsv"
  # read original_records into hash
  original_records = []
  headers = []
  CSV.read(filename, :col_sep => "\t", headers: false).each_with_index do |row, i|
    if i == 0 then
      headers = row
      next