Miscellaneous functions

f90calceph_getmaxsupportedorder

subroutine  f90calceph_getmaxsupportedorder(segid)

Parameters:

version [INTEGER, intent(in)] :: type of the segment.

Return:

f90calceph_getmaxsupportedorder [INTEGER] :: maximal order of the computable derivatives for this type of segment.

This function returns the maximal order of the derivatives computed by the functions f90calceph_compute_order(), f90calceph_orient_order(), .... for the segment type segid. If the segment type is unknown by the library, the function returns -1.

The accepted values of segid are the predefined constants CALCEPH_SEGTYPE_... (Constants).

integer maxorder

maxorder = calceph_getmaxsupportedorder(CALCEPH_SEGTYPE_SPK_2)
write(*,*) 'maximal order is ', maxorder

f90calceph_getversion_str

subroutine  f90calceph_getversion_str(version)

Parameters:

version [CHARACTER(len=CALCEPH_MAX_CONSTANTNAME), intent(out)] :: version of the library

This function returns the version of the CALCEPH Library, as a string.

Trailing blanks are added to the name version.

character(len=CALCEPH_MAX_CONSTANTNAME) version

call f90calceph_getversion_str(version)
write(*,*) 'library version is ', version