Import-Module HDF5

$name = 'sample'

$file = Join-Path (Split-Path $MyInvocation.MyCommand.Path) "$name.h5"

if (Test-Path $file) {
    Write-Error "File $file exists!"
    return
}

New-H5Drive $name $file -RW -Force

cd "$($name):\"

New-H5Attribute . attr1 'string attribute' cstring17

New-H5Dataset dset1 H5T_STD_I32BE 10,10

$value = New-Object 'int[,]' 10,10

foreach ($i in 0..9) {
    foreach ($j in 0..9) {
        $value[$i,$j] = $j
    }
}

Set-H5DatasetValue dset1 $value

$a = Get-H5DatasetValue dset1

$t = @"
{
    "Class": "Compound",
    "Size": 16,
    "Members":
    {
        "a": [0, "H5T_STD_I32BE"],
        "b": [4, "H5T_IEEE_F32BE"],
        "c": [8, "H5T_IEEE_F64BE"]
    }
}
"@

Add-Type @"
public class cmpd_a_b_c
{
    public int a;
    public float b;
    public double c;
}
"@

New-H5Dataset dset2 $t 5 

$value = New-Object 'cmpd_a_b_c[]' 5

foreach ($i in 0..4)
{
    $value[$i] = New-Object cmpd_a_b_c

    $value[$i].a = $i+1
    $value[$i].b = ($i+1)/10
    $value[$i].c = ($i+1)/100
}

Set-H5DatasetValue dset2 $value

$a = Get-H5DatasetValue dset2

New-H5Group group1

$t = @"
{
    "Class": "Compound",
    "Size": 136,
    "Members":
    {
        "a": [0, {"Class": "Array", "Base": "H5T_STD_I32BE", "Dims": [4]}],
        "b": [16,{"Class": "Array", "Base": "H5T_IEEE_F32BE", "Dims":[5,6]}]
    }
}
"@

Add-Type @"
public class cmpd_a_b 
{
    public int[] a = new int[4];
    public float[,] b = new float [5,6];
}
"@

New-H5LinkedDatatype type1 $t

cd group1

New-H5Dataset dset3 /type1 5 

$value = New-Object 'cmpd_a_b[]' 5

foreach ($i in 0..4)
{
    $value[$i] = New-Object cmpd_a_b

    foreach ($j in 0..3) {
        $value[$i].a[$j] = $j
    }
    foreach ($r in 0..4) {
        foreach ($c in 0..5) {
            $value[$i].b[$r,$c] = ($r+1)/10
        }
    }
}

Set-H5DatasetValue dset3 $value

$a = Get-H5DatasetValue dset3

cd ..

$t = '{"Class": "Vlen", "Base": "H5T_STD_I32LE"}'

New-H5Dataset dset3 $t 4 

$value = (,0), (10,11), (20,21,22), (30,31,32,33)

Set-H5DatasetValue dset3 $value

$a = Get-H5DatasetValue dset3

New-H5Hardlink group2 /group1

New-H5Softlink slink1 somevalue

# bonus material

$image = Join-Path (Split-Path $MyInvocation.MyCommand.Path) 'hdf_logo.jpg'

if (Test-Path $image)
{
    New-H5Image hdf_logo $image
}

C:

Remove-H5Drive $name

$hdfview = 'C:\Program Files\TheHDFGroup\HDFView2.8\HDFView.exe'
if (Test-Path $hdfview)
{
    & $hdfview $file 
}