Lines Matching refs:ofile
46 write_new_parameter_file(FILE *ofile,
135 FILE *ifile, *ofile; in convert_parameter_file() local
165 ofile = stdout; in convert_parameter_file()
166 } else if (!(ofile = fopen(oname, "a+"))) { in convert_parameter_file()
171 write_new_parameter_file(ofile, options); in convert_parameter_file()
172 if (ofile != stdout) in convert_parameter_file()
173 fclose(ofile); in convert_parameter_file()
768 write_new_parameter_file(FILE *ofile, in write_new_parameter_file() argument
803 fprintf(ofile, "## RNAfold parameter file v2.0\n"); in write_new_parameter_file()
806 fprintf(ofile, "\n# %s\n", settype(S)); in write_new_parameter_file()
807 fprintf(ofile, "/* CG GC GU UG AU UA @ */\n"); in write_new_parameter_file()
809 display_array(stack37_184[c] + 1, NBPAIRS, NBPAIRS, ofile); in write_new_parameter_file()
810 fprintf(ofile, "\n# %s\n", settype(S_H)); in write_new_parameter_file()
811 fprintf(ofile, "/* CG GC GU UG AU UA @ */\n"); in write_new_parameter_file()
813 display_array(enthalpies_184[c] + 1, NBPAIRS, NBPAIRS, ofile); in write_new_parameter_file()
817 fprintf(ofile, "\n# %s\n", settype(MMH)); in write_new_parameter_file()
822 display_array(mismatchH37_184[k][i], 5, 5, ofile); in write_new_parameter_file()
824 fprintf(ofile, "\n# %s\n", settype(MMH_H)); in write_new_parameter_file()
829 display_array(mism_H_184[k][i], 5, 5, ofile); in write_new_parameter_file()
834 fprintf(ofile, "\n# %s\n", settype(MMI)); in write_new_parameter_file()
839 display_array(mismatchI37_184[k][i], 5, 5, ofile); in write_new_parameter_file()
841 fprintf(ofile, "\n# %s\n", settype(MMI_H)); in write_new_parameter_file()
846 display_array(mism_H_184[k][i], 5, 5, ofile); in write_new_parameter_file()
851 fprintf(ofile, "\n# %s\n", settype(MMI1N)); in write_new_parameter_file()
856 display_array(mismatchI37_184[k][i], 5, 5, ofile); in write_new_parameter_file()
858 fprintf(ofile, "\n# %s\n", settype(MMI1N_H)); in write_new_parameter_file()
863 display_array(mism_H_184[k][i], 5, 5, ofile); in write_new_parameter_file()
868 fprintf(ofile, "\n# %s\n", settype(MMI23)); in write_new_parameter_file()
873 display_array(mismatchI37_184[k][i], 5, 5, ofile); in write_new_parameter_file()
875 fprintf(ofile, "\n# %s\n", settype(MMI23_H)); in write_new_parameter_file()
880 display_array(mism_H_184[k][i], 5, 5, ofile); in write_new_parameter_file()
885 fprintf(ofile, "\n# %s\n", settype(MMM)); in write_new_parameter_file()
886 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
897 display_array(bla, 5, 5, ofile); in write_new_parameter_file()
900 fprintf(ofile, "\n# %s\n", settype(MMM_H)); in write_new_parameter_file()
901 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
911 display_array(bla, 5, 5, ofile); in write_new_parameter_file()
917 fprintf(ofile, "\n# %s\n", settype(MME)); in write_new_parameter_file()
918 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
929 display_array(bla, 5, 5, ofile); in write_new_parameter_file()
932 fprintf(ofile, "\n# %s\n", settype(MME_H)); in write_new_parameter_file()
933 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
943 display_array(bla, 5, 5, ofile); in write_new_parameter_file()
949 fprintf(ofile, "\n# %s\n", settype(D5)); in write_new_parameter_file()
950 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
952 display_array(dangle5_37_184[c], 5, 5, ofile); in write_new_parameter_file()
953 fprintf(ofile, "\n# %s\n", settype(D5_H)); in write_new_parameter_file()
954 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
956 display_array(dangle5_H_184[c], 5, 5, ofile); in write_new_parameter_file()
960 fprintf(ofile, "\n# %s\n", settype(D3)); in write_new_parameter_file()
961 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
963 display_array(dangle3_37_184[c], 5, 5, ofile); in write_new_parameter_file()
964 fprintf(ofile, "\n# %s\n", settype(D3_H)); in write_new_parameter_file()
965 fprintf(ofile, "/* @ A C G U */\n"); in write_new_parameter_file()
967 display_array(dangle3_H_184[c], 5, 5, ofile); in write_new_parameter_file()
972 fprintf(ofile, "\n# %s\n", settype(INT11)); in write_new_parameter_file()
977 fprintf(ofile, "/* %2s..%2s */\n", pnames[k], pnames[l]); in write_new_parameter_file()
979 display_array(int11_37_184[k][l][i], 5, 5, ofile); in write_new_parameter_file()
982 fprintf(ofile, "\n# %s\n", settype(INT11_H)); in write_new_parameter_file()
987 fprintf(ofile, "/* %2s..%2s */\n", pnames[k], pnames[l]); in write_new_parameter_file()
989 display_array(int11_H_184[k][l][i], 5, 5, ofile); in write_new_parameter_file()
995 fprintf(ofile, "\n# %s\n", settype(INT21)); in write_new_parameter_file()
1001 fprintf(ofile, "/* %2s.%c..%2s */\n", pnames[p1], bnames[i], pnames[p2]); in write_new_parameter_file()
1003 display_array(int21_37_184[p1][p2][i][j], 5, 5, ofile); in write_new_parameter_file()
1006 fprintf(ofile, "\n# %s\n", settype(INT21_H)); in write_new_parameter_file()
1012 fprintf(ofile, "/* %2s.%c..%2s */\n", pnames[p1], bnames[i], pnames[p2]); in write_new_parameter_file()
1014 display_array(int21_H_184[p1][p2][i][j], 5, 5, ofile); in write_new_parameter_file()
1020 fprintf(ofile, "\n# %s\n", settype(INT22)); in write_new_parameter_file()
1027 fprintf(ofile, "/* %2s.%c%c..%2s */\n", pnames[p1], bnames[i], bnames[j], pnames[p2]); in write_new_parameter_file()
1029 display_array(int22_37_184[p1][p2][i][j][k] + 1, 4, 5, ofile); in write_new_parameter_file()
1032 fprintf(ofile, "\n# %s\n", settype(INT22_H)); in write_new_parameter_file()
1039 fprintf(ofile, "/* %2s.%c%c..%2s */\n", pnames[p1], bnames[i], bnames[j], pnames[p2]); in write_new_parameter_file()
1041 display_array(int22_H_184[p1][p2][i][j][k] + 1, 4, 5, ofile); in write_new_parameter_file()
1047 fprintf(ofile, "\n# %s\n", settype(HP)); in write_new_parameter_file()
1048 display_array(hairpin37_184, 31, 10, ofile); in write_new_parameter_file()
1052 fprintf(ofile, "\n# %s\n", settype(HP_H)); in write_new_parameter_file()
1054 fprintf(ofile, " INF INF INF"); in write_new_parameter_file()
1056 fprintf(ofile, "%6d", 0); in write_new_parameter_file()
1058 fprintf(ofile, "\n"); in write_new_parameter_file()
1061 fprintf(ofile, "\n"); in write_new_parameter_file()
1065 fprintf(ofile, "\n# %s\n", settype(B)); in write_new_parameter_file()
1066 display_array(bulge37_184, 31, 10, ofile); in write_new_parameter_file()
1071 fprintf(ofile, "\n# %s\n", settype(B_H)); in write_new_parameter_file()
1073 fprintf(ofile, " INF"); in write_new_parameter_file()
1075 fprintf(ofile, "%6d", 0); in write_new_parameter_file()
1077 fprintf(ofile, "\n"); in write_new_parameter_file()
1080 fprintf(ofile, "\n"); in write_new_parameter_file()
1084 fprintf(ofile, "\n# %s\n", settype(IL)); in write_new_parameter_file()
1085 display_array(internal_loop37_184, 31, 10, ofile); in write_new_parameter_file()
1090 fprintf(ofile, "\n# %s\n", settype(IL_H)); in write_new_parameter_file()
1092 fprintf(ofile, " INF INF INF INF"); in write_new_parameter_file()
1094 fprintf(ofile, "%6d", 0); in write_new_parameter_file()
1096 fprintf(ofile, "\n"); in write_new_parameter_file()
1099 fprintf(ofile, "\n"); in write_new_parameter_file()
1100 fprintf(ofile, "\n# %s\n" in write_new_parameter_file()
1107 fprintf(ofile, "\n# %s\n", settype(ML)); in write_new_parameter_file()
1108 fprintf(ofile, "/* F = cu*n_unpaired + cc + ci*loop_degree (+TermAU) */\n"); in write_new_parameter_file()
1109 fprintf(ofile, "/*\t cu\t cu_dH\t cc\t cc_dH\t ci\t ci_dH */\n"); in write_new_parameter_file()
1110 fprintf(ofile, in write_new_parameter_file()
1121 fprintf(ofile, "\n# %s\n", settype(MISC)); in write_new_parameter_file()
1122 fprintf(ofile, "/* all parameters are pairs of 'energy enthalpy' */\n"); in write_new_parameter_file()
1123 fprintf(ofile, "/* DuplexInit TerminalAU LXC */\n"); in write_new_parameter_file()
1124 fprintf(ofile, in write_new_parameter_file()
1135 fprintf(ofile, "\n# %s\n", settype(TRI)); in write_new_parameter_file()
1147 fprintf(ofile, "\t%.5s %6d %6d\n", Triloops_184 + c * 6, Triloop_E37_184[c] + en, base_dH); in write_new_parameter_file()
1155 fprintf(ofile, "\n# %s\n", settype(TL)); in write_new_parameter_file()
1170 fprintf(ofile, "\t%.6s %6d %6d\n", Tetraloops_184 + c * 7, en + TETRA_ENERGY37_184[c], dH); in write_new_parameter_file()
1173 fprintf(ofile, "\n# %s\n", settype(HEX)); in write_new_parameter_file()
1175 fprintf(ofile, "\n"); in write_new_parameter_file()
1179 fprintf(ofile, "\n# %s\n", settype(QUIT)); in write_new_parameter_file()