00001 #include <string.h>
00002 #include <stdio.h>
00003 #include "stack-c.h"
00004 #include "sciprint.h"
00005
00006
00007
00008
00009
00010
00011 int as2osc(thechain)
00012 char *thechain;
00013 {
00014 static int k, l;
00015 l = strlen(thechain);
00016 sciprint("character string length %d\r\n",l);
00017 for (k = 0 ; k < l; k++)
00018 {
00019 if ( thechain[k] == 'a' ) thechain[k]='o';
00020 }
00021 return 0;
00022 }
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044
00045
00046
00047
00048