version 1.20, 2005/12/20 19:59:52
|
version 1.22, 2024/04/29 00:22:49
|
Line 135 int caparesponse_get_real_response (char
|
Line 135 int caparesponse_get_real_response (char
|
double* scaled) { |
double* scaled) { |
//double caparesponse_get_real_response (char* unit_str, char* answer) { |
//double caparesponse_get_real_response (char* unit_str, char* answer) { |
int input_len,all_alphabet,idx,outcome=-1,result; |
int input_len,all_alphabet,idx,outcome=-1,result; |
double n_part,scale=1.0,given,target; |
ouble n_part,scale=1.0,given; |
char input[ANSWER_STRING_LENG],filename[FILE_NAME_LENGTH], |
char input[ANSWER_STRING_LENG],filename[FILE_NAME_LENGTH], |
tmp_unit_str[ANSWER_STRING_LENG]; |
tmp_unit_str[ANSWER_STRING_LENG]; |
Unit_t *ans_unit; |
Unit_t *ans_unit; |
long seed1,seed2; |
|
FILE *fp; |
FILE *fp; |
sprintf(filename,"/home/httpd/html/res/adm/includes/capa.units"); |
sprintf(filename,"/home/httpd/html/res/adm/includes/capa.units"); |
if ((fp=fopen(filename,"r"))==NULL) { |
if ((fp=fopen(filename,"r"))==NULL) { |
Line 184 int caparesponse_get_real_response (char
|
Line 183 int caparesponse_get_real_response (char
|
*scaled=given; |
*scaled=given; |
/* convert the given answer into proper scale for units */ |
/* convert the given answer into proper scale for units */ |
} /* end if unit check */ |
} /* end if unit check */ |
} else { /* user entered a |
} else { /* user entered alphabet, but no number */ |
lphabet, but no number */ |
|
result = WANTED_NUMERIC; |
result = WANTED_NUMERIC; |
} |
} |
return result; |
return result; |
} |
} |
|
|
/* Testing harnass |
/* Testing harness |
int main(void) { |
int main(void) { |
int result=0; |
int result=0; |
char *reterror=NULL; |
char *reterror=NULL; |