All the stuff needed by HSL_MA48
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(MA48_AINFO), | public | :: | ainf | ||||
type(MA48_CONTROL), | public | :: | ctrl | ||||
type(MA48_FACTORS), | public | :: | fact | ||||
integer(kind=I4), | public | :: | fast | ||||
type(MA48_FINFO), | public | :: | finf | ||||
real(kind=R8), | public, | dimension(2) | :: | resid | |||
type(MA48_SINFO), | public | :: | sinf | ||||
type(ZD11_TYPE), | public | :: | zmat |
type MAT_MA48 !! <span style="color:green">All the stuff needed by *HSL_MA48*</span> type(ZD11_TYPE) :: zmat type(MA48_CONTROL) :: ctrl type(MA48_AINFO) :: ainf type(MA48_FINFO) :: finf type(MA48_SINFO) :: sinf type(MA48_FACTORS) :: fact integer(kind=I4) :: fast real(kind=R8), dimension(2):: resid endtype MAT_MA48