mirror of
https://github.com/nasa/fpp.git
synced 2025-12-18 02:26:55 -06:00
13 lines
294 B
Fortran
13 lines
294 B
Fortran
locate constant a at "a.fpp"
|
|
locate constant b at "b.fpp"
|
|
locate constant c at "c.fpp"
|
|
locate dictionary constant d at "d.fpp"
|
|
|
|
locate type T at "T.fpp"
|
|
locate type C.T at "C.fpp"
|
|
locate dictionary type T2 at "T2.fpp"
|
|
|
|
array A1 = [a] T default b
|
|
array A2 = [a] C.T
|
|
dictionary array A3 = [d] T2
|