580   char* imode = StringStripper( mode );  in initphmpiio()  local
585   if ( cscompare( "read", imode ) ) {  in initphmpiio()
588   else if( cscompare( "write", imode ) ) {  in initphmpiio()
592     printf("Error initphmpiio: can't recognize the mode %s", imode);  in initphmpiio()
595   free ( imode );  in initphmpiio()
771   char* imode = StringStripper( mode );  in initphmpiiosub()  local
776   if ( cscompare( "read", imode ) ) {  in initphmpiiosub()
779   else if( cscompare( "write", imode ) ) {  in initphmpiiosub()
783     printf("Error initphmpiio: can't recognize the mode %s", imode);  in initphmpiiosub()
786   free ( imode );  in initphmpiiosub()
928     char* imode = StringStripper( mode );  in openfile()  local
935     if ( cscompare( "read", imode ) )  in openfile()
937     else if( cscompare( "write", imode ) )  in openfile()
939     else if( cscompare( "append", imode ) )  in openfile()
951     free (imode);  in openfile()
956     char* imode = StringStripper( mode );  in openfile()  local
962     if ( cscompare( "read", imode ) )  in openfile()
1084     else if( cscompare( "write", imode ) )  in openfile()
1104     free (imode);  in openfile()
1129     char* imode = StringStripper( mode );  in closefile()  local
1131     if( cscompare( "write", imode )  in closefile()
1132         || cscompare( "append", imode ) ) {  in closefile()
1137     free (imode);  in closefile()
1140     char* imode = StringStripper( mode );  in closefile()  local
1143     if ( cscompare( "write", imode ) ) {  in closefile()
1258     free ( imode );  in closefile()