常連

F#とOpenTKを用いて正二十面体を描画したいのですが、どのようなコードを記述すればいいのかわからなくなりました。
![F#+OpenTK一部コード群](f373768b27072f18dfe332ca658ba52d.jpeg)
こちらのコードを実行すると
![長方形複合体](1391706f114beda9391fb34227c263d6.jpeg)
このように表示され、正二十面体にならないので非常に困っています。
正二十面体はどのようにして記述できるかというコード詳細をご教授願えないでしょうか？

```F#+OpenTK
type GLEx = 
  /// Add multiple vertices to GL
  static member Vertices vertices = 
    for (x:float32), y, z in vertices do
      GL.Vertex3(x, y, z)

  /// Add mesh to the GL and set the specified normal vector first
  static member Face (x:float32, y, z) vertices = 
    GL.Normal3(x, y, z)
    GLEx.Vertices vertices
```

```F#+OpenTK
let cube = DF (fun ctx ->
    GL.Material(MaterialFace.FrontAndBack, MaterialParameter.Diffuse, ctx.Color)
    GL.Begin(BeginMode.Quads)
    GLEx.Face 
      (-1.f, 0.f, 0.f) 
      [ (-0.5f, -0.5f, -0.5f); (-0.5f, -0.5f,  0.5f); 
        (-0.5f,  0.5f,  0.5f); (-0.5f,  0.5f, -0.5f) ] 
    GLEx.Face 
      ( 1.f, 0.f, 0.f)
      [ ( 0.5f, -0.5f, -0.5f); ( 0.5f, -0.5f,  0.5f);
        ( 0.5f,  0.5f,  0.5f); ( 0.5f,  0.5f, -0.5f) ]
    GLEx.Face 
      (0.f, -1.f, 0.f)
      [ (-0.5f, -0.5f, -0.5f); (-0.5f, -0.5f,  0.5f);
        ( 0.5f, -0.5f,  0.5f); ( 0.5f, -0.5f, -0.5f) ]
    GLEx.Face 
      (0.f, 1.f, 0.f)
      [ (-0.5f,  0.5f, -0.5f); (-0.5f,  0.5f,  0.5f);
        ( 0.5f,  0.5f,  0.5f); ( 0.5f,  0.5f, -0.5f) ]
    GLEx.Face 
      (0.f, 0.f, -1.f)
      [ (-0.5f, -0.5f, -0.5f); (-0.5f,  0.5f, -0.5f);
        ( 0.5f,  0.5f, -0.5f); ( 0.5f, -0.5f, -0.5f) ]
    GLEx.Face 
      (0.f, 0.f, 1.f)
      [ (-0.5f, -0.5f,  0.5f); (-0.5f,  0.5f,  0.5f);
        ( 0.5f,  0.5f,  0.5f); ( 0.5f, -0.5f,  0.5f) ]
    GL.End() )
```
となるわけで正六面体(=立方体)２４箇所座標があるということは
正二十面体では１２箇所では足りないのではと思いまして
とりあえず
必要なことは
(各頂点数×一点に集約される面数÷正N面体の面数分)
＝一つ分の面の座標かなと。
下記のjavaの正二十面体のプログラムをF#にコンバートすることはできませんか？誰かよろしくお願いします。
```
import java.applet.*;
import java.awt.*;

import com.sun.j3d.utils.picking.behaviors.PickRotateBehavior;
import com.sun.j3d.utils.universe.*;
import javax.media.j3d.*;
import javax.vecmath.*;

public class Icosahedron2 extends Applet{
	private static final long serialVersionUID = 1L;
	private SimpleUniverse u = null;

	public void init(){
		int i;
		
		//<set layout of applet, construct canvas3d, add canvas3d>
		setLayout(new BorderLayout());
		GraphicsConfiguration config = SimpleUniverse.getPreferredConfiguration();
		Canvas3D canvas3d = new Canvas3D(config);
		add(canvas3d, BorderLayout.CENTER);

		//create scene graph
		BranchGroup root = new BranchGroup();
		Transform3D tr = new Transform3D();
		tr.setScale(0.48);
		TransformGroup tg = new TransformGroup(tr);
		root.addChild(tg);

		//appearance for polygon
		Appearance ap = new Appearance();
	    Material mt = new Material();
	    mt.setLightingEnable(true);
	    ap.setMaterial(mt);
	    PolygonAttributes pa = new PolygonAttributes();
	    pa.setBackFaceNormalFlip(true);
	    pa.setCullFace(PolygonAttributes.CULL_NONE);
	    ap.setPolygonAttributes(pa);

	    //coordinates of vertices
	    Point3f[] vertices = new Point3f[12];
	    float x = (float) ((1+Math.sqrt(5))/2);

	    vertices[0] = new Point3f( 1,  x,  0);
	    vertices[1] = new Point3f(-1,  x,  0);
	    vertices[2] = new Point3f(-1, -x,  0);
	    vertices[3] = new Point3f( 1, -x,  0);
	    vertices[4] = new Point3f( 0,  1,  x);
	    vertices[5] = new Point3f( 0, -1,  x);
	    vertices[6] = new Point3f( 0, -1, -x);
	    vertices[7] = new Point3f( 0,  1, -x);
	    vertices[8] = new Point3f( x,  0,  1);
	    vertices[9] = new Point3f( x,  0, -1);
	    vertices[10] = new Point3f(-x,  0, -1);
	    vertices[11] = new Point3f(-x,  0,  1);
	    
	    //polygon of 3 rectangles
	    QuadArray geometry = new QuadArray(12, QuadArray.COORDINATES | QuadArray.NORMALS | QuadArray.COLOR_3);
		geometry.setCoordinates(0, vertices);
		for(i=0; i<4; i++) geometry.setNormal(i, new Vector3f(0, 0, 1));
		for(i=4; i<8; i++) geometry.setNormal(i, new Vector3f(1, 0, 0));
		for(i=8; i<12; i++) geometry.setNormal(i, new Vector3f(0, 1, 0));
		for(i=0; i<4; i++) geometry.setColor(i, new Color3f(Color.RED));
		for(i=4; i<8; i++) geometry.setColor(i, new Color3f(Color.GREEN));
		for(i=8; i<12; i++) geometry.setColor(i, new Color3f(Color.BLUE));
		Shape3D s3d = new Shape3D(geometry);
		s3d.setAppearance(ap);
		tg.addChild(s3d);

	    //wire frame
		for(i=0; i<12; i++){
			for(int j=i; j<12; j++){
				if (vertices[i].distance(vertices[j]) < 2.1f){
					LineArray ends = new LineArray(2, GeometryArray.COORDINATES);
					Point3f vertex[] = new Point3f[2];
					vertex[0] = vertices[i];
					vertex[1] = vertices[j];
					ends.setCoordinates(0, vertex);
					Shape3D line = new Shape3D(ends);
					tg.addChild(line);
				}
			}
		}
		
		//lighting
		BoundingSphere bounds =
			new BoundingSphere(new Point3d(0.0,0.0,0.0), 100.0);
		
		Color3f color = new Color3f(1.0f, 1.0f, 1.0f);	// white light
		Vector3f direction = new Vector3f(4.0f,5.0f,-10.0f);
		DirectionalLight light = new DirectionalLight(color,direction);
		light.setInfluencingBounds(bounds);
		root.addChild(light);

		//picking
		BoundingSphere bounds2 =
			new BoundingSphere(new Point3d(0.0,0.0,0.0), 0.1);
		PickRotateBehavior prb = new PickRotateBehavior(root,canvas3d,bounds2);	//left button
		root.addChild(prb);
		tg.setCapability(TransformGroup.ALLOW_TRANSFORM_WRITE);
		tg.setCapability(TransformGroup.ALLOW_TRANSFORM_READ);
		tg.setCapability(TransformGroup.ENABLE_PICK_REPORTING);

		u = new SimpleUniverse(canvas3d);
		u.getViewingPlatform().setNominalViewingTransform();
		u.addBranchGraph(root);
	}
}
```

正二十面体の作成の仕方

visual studio2019　にて　新しいプロジェクトをF#のasp.net coreに設定して
startup.fs にこのようなコードを試しながら書いてみたのですが
どうしても日本語が日本語になりません
```namespace dousuru

open System
open System.Text
open Microsoft.AspNetCore.Builder
open Microsoft.AspNetCore.Hosting
open Microsoft.AspNetCore.Http
open Microsoft.Extensions.DependencyInjection
open Microsoft.Extensions.Hosting

type Startup() =
    let jumon =  Encoding.RegisterProvider(CodePagesEncodingProvider.Instance)
    let nihongo agrs = System.Text.Encoding.UTF8
    let (br,sengen,toji) = ("<br />","<html hreflang=\"ja\">","</html>")
    let kotoba=
        [|
        "Hello World!"
        "日本語"
        |]
    // This method gets called by the runtime. Use this method to add services to the container.
    // For more information on how to configure your application, visit https://go.microsoft.com/fwlink/?LinkID=398940
    member _.ConfigureServices(services: IServiceCollection) =
        ()

    // This method gets called by the runtime. Use this method to configure the HTTP request pipeline.
    member _.Configure(app: IApplicationBuilder, env: IWebHostEnvironment) =
        if env.IsDevelopment() then
            app.UseDeveloperExceptionPage() |> ignore
        
        app.UseRouting()
           .UseEndpoints(fun endpoints ->
                endpoints.MapGet("/", fun context ->
                    context.Response.WriteAsync(sengen) |> ignore
                    context.Response.WriteAsync("<body>") |> ignore
                    context.Response.WriteAsync(kotoba.[0] + br) |> ignore
                    context.Response.WriteAsync(kotoba.[1]) |> ignore
                    context.Response.WriteAsync("</body>") |> ignore
                    nihongo |> ignore
                    context.Response.WriteAsync(toji)) |> ignore
            ) |> ignore

```

これを実行すると、
![実行した画面](6b946ae016acef763bfe8928cdaa12cd.png)

このような文字が表示されてしまいます。
これを　日本語　と表示したいと考えています。

はい。
ご指摘の通り
![イメージ説明](0696f24982ed05a5453ac2a01f528075.png)
これはやってみましたが、これはすべてのファイルにやったほうがいいのでしょうか？

asp.net.coreでの文字化けを解決したい。

教科書に載っている「ハングマン」のコードをpythonで打ち込んで完成しました。
これを人に送るときどのように知ればいいでしょうか？

私が打ち込んだのは


ファイル→NEWファイル


の中です。
打ち込んだ後

F5を押して実行して確認しました。

マイドキュメントに保存されたものをGmailで自分に送ってみたのですが開けません。
何か送る方法はありますか？

私が実行したように受け取った人もF5で実行することになりますか？
よろしくお願いいたします。

私のコードを人に送る方法

### 前提・実現したいこと

F#でWPFのアプリケーションを作りたいです。

### 発生している問題・エラーメッセージ

空のウィンドウを開くことを期待しましたが、ウィンドウは開かず、プログラムがすぐ終了してしまいます。

リビルドを実行すると、以下のメッセージが残っていて、mainが空だと言われます。
実行時、例外などは発生していないようです。

```
リビルドを開始しました...
1>------ すべてのリビルド開始: プロジェクト:MyApp, 構成: Debug Any CPU ------
D:\Workspace\repos\MyApp\MyApp\MyApp.fsproj を復元しました (415 ms)。
1>D:\Workspace\repos\MyApp\MyApp\obj\Debug\net472\MyApp.AssemblyInfo.fs(17,5): warning FS0988: プログラムのメイン モジュールが空です。実行しても何も処理されません
1>MyApp-> D:\Workspace\repos\MyApp\MyApp\bin\Debug\net472\MyApp.exe
1>プロジェクト "MyApp.fsproj" のビルドが終了しました。
========== すべてリビルド: 1 正常終了、0 失敗、0 スキップ ==========
```

### ソースコード

```fsharp
open System
open System.Windows
open System.Windows.Controls
open System.Windows.Markup
 
[<STAThread>]
[<EntryPoint>]
let main argv = 
    let mainWindow = Application.LoadComponent(
                        new System.Uri("/MyApp;component/MainWindow.xaml", UriKind.Relative)) :?> Window
 
    let application = new Application()
    application.Run(mainWindow)
```

```fsharp
// <auto-generated>
//     Generated by the FSharp WriteCodeFragment class.
// </auto-generated>
namespace FSharp

open System
open System.Reflection


[<assembly: System.Reflection.AssemblyCompanyAttribute("MyApp")>]
[<assembly: System.Reflection.AssemblyConfigurationAttribute("Debug")>]
[<assembly: System.Reflection.AssemblyFileVersionAttribute("1.0.0.0")>]
[<assembly: System.Reflection.AssemblyInformationalVersionAttribute("1.0.0")>]
[<assembly: System.Reflection.AssemblyProductAttribute("MyApp")>]
[<assembly: System.Reflection.AssemblyTitleAttribute("MyApp")>]
[<assembly: System.Reflection.AssemblyVersionAttribute("1.0.0.0")>]
do()

```

### 参考

インストールしてあるVisual Studio 2019のスタート画面からはF# Empty Windows Appのテンプレートが無いため、以下のサイトの手順に従ってコンソールアプリのテンプレートをもとにプロジェクトを作成しています。

[Creating a WPF application in F#](http://putridparrot.com/blog/creating-a-wpf-application-in-f/)

### 補足情報（FW/ツールのバージョンなど）

Visual Studioとインストールされたコンポーネントの情報です
```
Microsoft Visual Studio Community 2019
Version 16.11.0
VisualStudio.16.Release/16.11.0+31605.320
Microsoft .NET Framework
Version 4.8.04084

インストールされているバージョン:Community

Visual C++ 2019   00435-60000-00000-AA646
Microsoft Visual C++ 2019

ASP.NET and Web Tools 2019   16.11.75.64347
ASP.NET and Web Tools 2019

Azure App Service Tools v3.0.0   16.11.75.64347
Azure App Service Tools v3.0.0

Boost.Test のテスト アダプター   1.0
Boost.Test 向けに作成された単体テストを含む、Visual Studio のテスト ツールを有効にします。拡張機能のインストール ディレクトリに、使用条件およびサード パーティからの通知が含まれています。

C# ツール   3.11.0-4.21403.6+ae1fff344d46976624e68ae17164e0607ab68b10
IDE で使用する C# コンポーネント。プロジェクトの種類や設定に応じて、異なるバージョンのコンパイラを使用できます。

Common Azure Tools   1.10
Azure Mobile Services および Microsoft Azure Tools で使用する共通サービスを提供します。

IntelliCode 拡張機能   1.0
IntelliCode Visual Studio 拡張機能の詳細情報

Microsoft JVM Debugger   1.0
Provides support for connecting the Visual Studio debugger to JDWP compatible Java Virtual Machines

Microsoft MI-Based Debugger   1.0
Provides support for connecting Visual Studio to MI compatible debuggers

Microsoft Visual C++ ウィザード   1.0
Microsoft Visual C++ ウィザード

Microsoft Visual Studio VC パッケージ   1.0
Microsoft Visual Studio VC パッケージ

NuGet パッケージ マネージャー   5.11.0
Visual Studio 内の NuGet パッケージ マネージャー。NuGet の詳細については、https://docs.nuget.org/ にアクセスしてください

ProjectServicesPackage Extension   1.0
ProjectServicesPackage Visual Studio Extension Detailed Info

Test Adapter for Google Test   1.0
Google Test 向けに作成された単体テストを含む、Visual Studio のテスト ツールを有効にします。拡張機能のインストール ディレクトリに、使用条件およびサード パーティからの通知が含まれています。

TypeScript Tools   16.0.30526.2002
TypeScript Tools for Microsoft Visual Studio

Visual Basic ツール   3.11.0-4.21403.6+ae1fff344d46976624e68ae17164e0607ab68b10
IDE で使用する Visual Basic コンポーネント。プロジェクトの種類や設定に応じて、異なるバージョンのコンパイラを使用できます。

Visual F# Tools   16.11.0-beta.21322.6+488cc578cafcd261d90d748d8aaa7b8b091232dc
Microsoft Visual F# Tools

Visual Studio Code デバッグ アダプターのホスト パッケージ   1.0
Visual Studio Code デバッグ アダプターを Visual Studio でホストするための相互運用レイヤー

Visual Studio Tools for CMake   1.0
Visual Studio Tools for CMake

Visual Studio Tools for Unity   4.11.3.0
Visual Studio Tools for Unity
```

ウィンドウが開かず、何も起きないままプログラムが終了してしまう。

現在とても困っていることがあります。

前任者が居なくなってしまい、
AWSのECS+FargateにデプロイされたDockerコンテナの中身が分からない状態になってしまっています。

EC2は使っていません。
その中身を確認する方法ってあったりしますでしょうか？

AWS ECS+fargateのコンテナの中身を見たい

ファイル内にある画像をsortとgrobを用いて画像の名前順に読み込み，それぞれの画像の輝度値を引き算した画像を作成したいです。
(ファイル内の画像が1.jpg，2.jpg・・・10.jpgの10枚であれば，
（2.jpgの輝度値）-（1.jpgの輝度値），（3.jpgの輝度値）-（2.jpgの輝度値）,（4.jpgの輝度値）-（3.jpgの輝度値）・・・
といった処理)
下記コードでi枚目の画像読み込みはできているのですが，i+1枚目の画像読み込みが上手くできません。
エラーコードとfの中身を確認したのですがどのようなコードに変更すればよいかが分かりません。
どなたかよろしくお願い致します。
```
import cv2
import numpy as np
import glob
import re

def atoi(text):
    return int(text) if text.isdigit() else text

def natural_keys(text):
    return [ atoi(c) for c in re.split(r'(\d+)', text) ]

files = sorted(glob.glob('./in/*.jpg'), key=natural_keys)
for i, f in enumerate(files):
    #1枚目の画像読み込み
    img_0 = cv2.imread(f, cv2.IMREAD_GRAYSCALE)
    img_0 = img_0.astype(int) 
    #2枚目の画像読み込み
    F=f+1
    img_1 = cv2.imread(F, cv2.IMREAD_GRAYSCALE)
    img_1 = img_0.astype(int) 
                
    
    ##背景画像を引き算し，下限を0に設定
    img_sad = img_1 - img_0
    img_sad[img_sad < 0] = 0
    
    save_path = './bg2/_%d.jpg' %i
    cv2.imwrite(save_path, img_sad) 
 
コード
```
```
エラー
TypeError                                 Traceback (most recent call last)
<ipython-input-22-a23488329142> in <module>
     16     img_0 = img_0.astype(int)
     17     #2枚目の画像読み込み
---> 18     F=f+1
     19     img_1 = cv2.imread(F, cv2.IMREAD_GRAYSCALE)
     20     img_1 = img_0.astype(int)

TypeError: must be str, not int



fの確認
print(f)
出力結果
./in\1.JPG
コード
```

python forを用いたi+1枚目の画像の読み込み

### 前提
F#の学習を始めたものです。

`dotnet fsi`でインタラクティブな状態で定義すると、下例のように表示されるかと思います。
``` Fsharp
> let func x = 0.0;;
val func: x: 'a -> float
``` 

この、`val func: x: 'a -> float`にあたる部分を
ソースコードを実行した場合でも出力できるようにしたいのですがそのやり方がわかりません。

### 実現したいこと
`dotnet fsi Example.fsx`を実行した際に`val func: x: 'a -> float`のような形式で出力したいです。

もしくは　オプション等で表示することが可能なら、そちらのコマンドをご教授いただきたいです。

### 発生している問題・エラーメッセージ
実行しても該当部分が表示されない。

### 該当のソースコード
```Fsharp 
// Example.fsx
let func x = 0.0;;
```

### 試したこと
`printfn "%A" func` を追記して実行 -> `<fun:it@3>`と出力された

次のような検索で調べてみましたが望んだ情報はヒットしませんでした。
- dotnet fsi val it 表示
- F# val it 表示
- F# val it インタラクティブ以外で

### 補足情報（FW/ツールのバージョンなど）
- .Net core 6.0.201



インタラクティブでないやり方でVal it を出力したい

# したいこと
C#やF#のコードからMacの
![見本](b06460a244b1d258bd7e7d343d07227d.png)
のような拡張子なしの実行ファイルを作りたいのですが、可能でしょうか
Visual Studioで色々なソリューションの種類を試してみたのですが、
生成する方法を見つけらなかったので、質問させていただきました