Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | SysName | |||
character(len=*), | intent(in) | :: | VarDesc | |||
real(kind=r64), | intent(in) | :: | VarValue |
SUBROUTINE AddSQLiteSystemSizingRecord (SysName, VarDesc, VarValue)
IMPLICIT NONE ! Enforce explicit typing of all variables in this routine
! SUBROUTINE ARGUMENT DEFINITIONS:
CHARACTER(len=*), INTENT(IN) :: SysName ! the name of the system
CHARACTER(len=*), INTENT(IN) :: VarDesc ! the description of the input variable
REAL(r64), INTENT(IN) :: VarValue ! the value from the sizing calculation
END SUBROUTINE AddSQLiteSystemSizingRecord