4 ! ICE when loading module UnstructuredGridImages
5 ! because the type UnstructuredGridImageSiloForm
6 ! is not accessible there under its name.
8 ! Contributed by Reuben Budiardja <reubendb@gmail.com>
10 module UnstructuredGridImageSilo_Form
13 type, public, abstract :: GridImageSiloTemplate
14 end type GridImageSiloTemplate
15 type, public, extends ( GridImageSiloTemplate ) :: &
16 UnstructuredGridImageSiloForm
17 end type UnstructuredGridImageSiloForm
18 end module UnstructuredGridImageSilo_Form
20 module UnstructuredGridImages
21 use UnstructuredGridImageSilo_Form, &
22 UnstructuredGridImageForm => UnstructuredGridImageSiloForm
23 end module UnstructuredGridImages
26 use UnstructuredGridImages