-
Notifications
You must be signed in to change notification settings - Fork 2
/
print2.fs
31 lines (25 loc) · 1.1 KB
/
print2.fs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
(*
Copyright (c) 2022 Jun-ichiro Sugisaka
This software is released under the MIT License.
http://opensource.org/licenses/mit-license.php
*)
namespace Aqualis
[<AutoOpen>]
module print_ax =
///<summary>画面表示</summary>
type print with
///<summary>1個の項目を画面表示</summary>
static member c (s:num1) =
iter.range _1 s.size1 <| fun i ->
print.cc i s[i]
///<summary>1個の項目を画面表示</summary>
static member c (s:num2) =
iter.range _1 s.size1 <| fun i ->
iter.range _1 s.size2 <| fun j ->
print.ccc i j s[i,j]
///<summary>1個の項目を画面表示</summary>
static member c (s:num3) =
iter.range _1 s.size1 <| fun i ->
iter.range _1 s.size2 <| fun j ->
iter.range _1 s.size3 <| fun k ->
print.cccc i j k s[i,j,k]