diff --git a/src/IPhreeqc.f.inc b/src/IPhreeqc.f.inc index 84336f40..5dcd8e8e 100644 --- a/src/IPhreeqc.f.inc +++ b/src/IPhreeqc.f.inc @@ -64,6 +64,7 @@ C INTEGER(KIND=4) GetSelectedOutputColumnCount LOGICAL(KIND=4) GetSelectedOutputFileOn INTEGER(KIND=4) GetSelectedOutputRowCount + INTEGER(KIND=4) GetSelectedOutputStringLineCount INTEGER(KIND=4) GetSelectedOutputValue INTEGER(KIND=4) GetWarningStringLine INTEGER(KIND=4) GetWarningStringLineCount diff --git a/src/IPhreeqc.f90.inc b/src/IPhreeqc.f90.inc index 6100d518..7f16a6a8 100644 --- a/src/IPhreeqc.f90.inc +++ b/src/IPhreeqc.f90.inc @@ -254,6 +254,14 @@ END INTERFACE + INTERFACE + FUNCTION GetSelectedOutputStringLineCount(ID) + INTEGER(KIND=4), INTENT(IN) :: ID + INTEGER(KIND=4) :: GetSelectedOutputStringLineCount + END FUNCTION GetSelectedOutputStringLineCount + END INTERFACE + + INTERFACE FUNCTION GetSelectedOutputValue(ID,ROW,COL,VTYPE,DVALUE,SVALUE) INTEGER(KIND=4), INTENT(IN) :: ID