public static void Copy(ref string destinationString, int startIndex, int lastIndex, char source)
{
if (startIndex != lastIndex)
{
var argEx = new ArgumentException("startIndex != lastIndex");
}
FortranLib.Copy(ref destinationString, startIndex, lastIndex, source.ToString());
}
public static void Copy(Characters destination, string source)
{
FortranLib.Copy(destination.CharArray, 1, source.ToCharArray());
}
public static void Copy(Characters destination, int startIndex, int lastIndex, string source)
{
FortranLib.Copy(destination.CharArray, startIndex, lastIndex, source.ToCharArray());
}
public static void Copy(Characters destination, Characters source)
{
FortranLib.Copy(destination.CharArray, 1, source.CharArray);
}
public static void Copy(Characters destination, int startIndex, Characters source)
{
FortranLib.Copy(destination.CharArray, startIndex, source.CharArray);
}
public static void Copy(char[] destinationArray, int startIndex, char[] sourceArray)
{
FortranLib.Copy(destinationArray, startIndex, destinationArray.Length, sourceArray);
}
/// <summary>
///Retrieves a substring . The substring starts at a specified
///character position.
/// </summary>
/// <param name="s"></param>
/// <param name="startIndex"></param>
/// <returns></returns>
public static char[] Substring(char[] s, int startIndex)
{
return(FortranLib.Substring(s, startIndex, s.Length));
}
public static void Copy(ref string destinationString, string sourceString)
{
FortranLib.Copy(ref destinationString, 1, sourceString);
}
public static void Copy(ref string destinationString, int startIndex, string sourceString)
{
int lastIndex = Math.Min(destinationString.Length, sourceString.Length);
FortranLib.Copy(ref destinationString, startIndex, lastIndex, sourceString);
}
public static void Copy(ref string destinationString, int startIndex, int lastIndex, string sourceString)
{
char[] destinationArray = destinationString.ToCharArray();
FortranLib.Copy(destinationArray, startIndex, lastIndex, sourceString.ToCharArray());
destinationString = new string(destinationArray);
}
public static int INDEX(Characters chars, Characters value)
{
return(FortranLib.INDEX(chars.ToString(), value.ToString()));
}
public static int INDEX(Characters chars, string value)
{
return(FortranLib.INDEX(chars.ToString(), value, false));
}
public static int INDEX(Characters chars, string value, bool back)
{
return(FortranLib.INDEX(chars.ToString(), value, back));
}
public static int SCAN(Characters charArray, string set)
{
return(FortranLib.SCAN(charArray.ToString(), set));
}