9 lines
175 B
Fortran
9 lines
175 B
Fortran
TYPE DATUM
|
|
REAL VALUE
|
|
REAL SD
|
|
END TYPE DATUM
|
|
TYPE POINT
|
|
TYPE(DATUM) X
|
|
TYPE(DATUM) Y
|
|
END TYPE POINT
|
|
TYPE(POINT) P1,P2
|