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 |