Parent Directory | Revision Log | Patch
revision 9 by guez, Mon Mar 31 12:24:17 2008 UTC | revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC | |
---|---|---|
# | Line 20 program test_disvert | Line 20 program test_disvert |
20 | sigma = ap / pa + bp | sigma = ap / pa + bp |
21 | p = ap + bp * preff | p = ap + bp * preff |
22 | ||
23 | unit = new_unit() | call new_unit(unit) |
24 | open(unit, file="test_disvert.csv", status="replace", action="write") | open(unit, file="test_disvert.csv", status="replace", action="write") |
25 | write(unit, fmt=*) '"ap (Pa)" "bp" "sigma" "p (Pa)"' ! title line | write(unit, fmt=*) '"ap (Pa)" "bp" "sigma" "p (Pa)"' ! title line |
26 | do l = 1, llm | do l = 1, llm |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |