; 4-FEB-76 ; FOLLOWING IS A LISTING OF VARIOUS UTILITY ROUTINES ; CALLABLE BY FORTRAN MAIN PROGRAMS. ; ALL BUT THE FIRST ARE WRITTEN IN MACRO. ; LARRY SIMPSON ; DEPT. OF MEDICAL PHYSICS ; MICHAEL REESE MEDICAL CENTER ; CHICAGO, ILL. 60616 ; (312) 791-2515 ; FLOPEN ; 'FOR' ROUTINE TO SOLICIT FILE NAME AND PREPARE FOR OPEN ; STRCMP ; MACRO ROUTINE TO COMPARE STRINGS FOR EQUALITY ; MOCNVT ; MACRO ROUTINE CONVERTS MONTH NUMBER TO ASCII AND VICE VERSA ; STRCON ; MACRO ROUTINE TO CONCATENATE ANY NUMBER OF STRINGS ; MAXINT ; MACRO ROUTINE TO FIND MAX OF AN INTEGER ARRAY ; AMAXFA ; MACRO ROUTINE TO FIND MAX OF A FLOATING ARRAY ; CHRCNT ; MACRO ROUTINE TO COUNT # OF GIVEN CHAR. IN ASCII ARRAY ; FLINTP ; MACRO ROUTINE TO PERFORM FLOATING LINEAR INTERPOLATION ; LNFILL ; MACRO ROUTINE TO FILL AN ASCII ARRAY WITH A GIVEN CHARACTER ; TRNCAT ; MACRO ROUTINE TO GIVE POSITION OF LAST NON-BLANK CHAR IN ASCII ARRAY ; LUNDLT ; MACRO ROUTINE TO DELETE AN OPEN FILE ON A GIVEN LUN ; ATTDET ; MACRO ROUTINE TO ATTACH AND DETACH A DEVICE