version 1.122, 2012/03/26 16:34:35
|
version 1.123, 2012/05/26 10:20:01
|
Line 408 struct Cellpair parse_white(Char *c_addr
|
Line 408 struct Cellpair parse_white(Char *c_addr
|
Cell rename_file(Char *c_addr1, UCell u1, Char *c_addr2, UCell u2); |
Cell rename_file(Char *c_addr1, UCell u1, Char *c_addr2, UCell u2); |
struct Cellquad read_line(Char *c_addr, UCell u1, FILE *wfileid); |
struct Cellquad read_line(Char *c_addr, UCell u1, FILE *wfileid); |
struct Cellpair file_status(Char *c_addr, UCell u); |
struct Cellpair file_status(Char *c_addr, UCell u); |
Cell to_float(Char *c_addr, UCell u, Float *r_p); |
Cell to_float(Char *c_addr, UCell u, Float *r_p, Char dot); |
Float v_star(Float *f_addr1, Cell nstride1, Float *f_addr2, Cell nstride2, UCell ucount); |
Float v_star(Float *f_addr1, Cell nstride1, Float *f_addr2, Cell nstride2, UCell ucount); |
void faxpy(Float ra, Float *f_x, Cell nstridex, Float *f_y, Cell nstridey, UCell ucount); |
void faxpy(Float ra, Float *f_x, Cell nstridex, Float *f_y, Cell nstridey, UCell ucount); |
UCell lshift(UCell u1, UCell n); |
UCell lshift(UCell u1, UCell n); |