Yuto Horikawa hyrodium

## stereographic_projection.svg

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                hyrodium
                / stereographic_projection.svg
            
            
              Created
              January 3, 2023 14:56
            
              
                Stereographic projection
              
          
      Sorry, something went wrong. Reload?
      Sorry, we cannot display this file.
      Sorry, this file is invalid so it cannot be displayed.
      
          Viewer requires iframe.
      
    
## logo_for_Quaternions.jl
using Luxor, Colors

R = 100

@svg begin
	Drawing(400,400, "logo_a.svg")
	p_1 = Point(0, 0)
	p_i = Point(2R/√3, 0)
	p_j = Point(-R/√3, -R)
	p_k = Point(-R/√3, R)

## snake.jl
using BasicBSpline
using ExportNURBS
using Colors

p = 3
f(u) = [u[1],sin(u[1])]

N = 80
w = 5
W = 7

## juno_println.jl
versioninfo()

function busysleep(t)
    T = time()
    while -T+time()<t
    end
end

begin
    sleep(0.1)

## math-term.txt
くうしゅうごう	空集合	名詞
しゅういき	終域	名詞
しいき	始域	名詞
かそく	可測	名詞
ぜろしゅうごう	零集合	名詞
かんしゅ	関手	名詞
せつくうかん	接空間	名詞
よせつくうかん 	余接空間	名詞
せつべくとる	接ベクトル	名詞
よせつべくとる	余接ベクトル	名詞

## curvature.nb
(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 9.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest

## DoublePendulum.txt
3.,3.,2.999090420736601,3.000306218455809,2.9963348811220354,3.0012700522030005,2.9916507744179004,3.0030295990241993,2.984896713617297,3.0058226848669354,2.975866831818867,3.0099979879750776,2.964283447122206,3.0160294868463957,2.9497886133191225,3.0245327846940824,2.9319368825464296,3.036278479994982,2.9101933223559118,3.052194100758265,2.8839442004426274,3.0733392646198583,2.8525310463369813,3.100831969658668,2.815318424548651,3.1357044778136465,2.77179415906357,3.178690038744989,2.721674035621527,3.2299941601740296,2.664956111069121,3.289156307243964,2.6018788782995386,3.3550880719952545,2.5327921518684997,3.426263892342719,2.457999133839545,3.5009403799185095,2.3776238844442075,3.577285314048566,2.2915179385082243,3.653370876753737,2.199187721993915,3.7270395630468984,2.0997158021382303,3.7956585705239196,1.9916561001648574,3.8557644931342963,1.8729018385624967,3.902600705554045,1.7405665181283814,3.9296060477895196,1.591001284915447,3.9280746508327966,1.4201765287815373,3.8874506928342267,1.224628766898
	using Luxor, Colors

	R = 100

	@svg begin
	Drawing(400,400, "logo_a.svg")
	p_1 = Point(0, 0)
	p_i = Point(2R/√3, 0)
	p_j = Point(-R/√3, -R)
	p_k = Point(-R/√3, R)
	using BasicBSpline
	using ExportNURBS
	using Colors

	p = 3
	f(u) = [u[1],sin(u[1])]

	N = 80
	w = 5
	W = 7
	versioninfo()

	function busysleep(t)
	T = time()
	while -T+time()<t
	end
	end

	begin
	sleep(0.1)
	くうしゅうごう空集合名詞
	しゅういき終域名詞
	しいき始域名詞
	かそく可測名詞
	ぜろしゅうごう零集合名詞
	かんしゅ関手名詞
	せつくうかん接空間名詞
	よせつくうかん余接空間名詞
	せつべくとる接ベクトル名詞
	よせつべくとる余接ベクトル名詞
	(* Content-type: application/vnd.wolfram.mathematica *)

	(* Wolfram Notebook File *)
	(* http://www.wolfram.com/nb *)

	(* CreatedBy='Mathematica 9.0' *)

	(CacheID: 234)
	(* Internal cache information:
	NotebookFileLineBreakTest