Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=I4), | public | :: | lb1 |
lower bound 1 |
|||
integer(kind=I4), | public | :: | lb2 |
lower bound 2 |
|||
integer(kind=I4), | public | :: | ub1 |
upper bound 1 |
|||
integer(kind=I4), | public | :: | ub2 |
upper bound 2 |
type tborne integer(kind=I4) :: lb1 !! lower bound 1 integer(kind=I4) :: ub1 !! upper bound 1 integer(kind=I4) :: lb2 !! lower bound 2 integer(kind=I4) :: ub2 !! upper bound 2 endtype tborne