Changeset 36


Ignore:
Timestamp:
Aug 11, 2005, 11:15:45 AM (19 years ago)
Author:
dkearney
Message:

added multiple plots on same graph to example
added <about> tags for labels in tool.xml

Location:
trunk/examples/fermi_fortran
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/examples/fermi_fortran/fermi_example.f

    r30 r36  
    88           
    99            CHARACTER*100 inFile, outFile
    10             character*100 T_path, Ef_path, outPath
     10            character*100 T_path, Ef_path, outPath, outPath2,outPath3
    1111            character*40 xy
    1212            integer handle
    … …  
    5050 15         continue
    5151
     52            outPath = "output.curve(f13).about.group"
     53            call rp_lib_put_str(handle,outPath,"group1",1)
    5254            outPath = "output.curve(f13).xaxis.label"
    5355            call rp_lib_put_str(handle,outPath,"f13 x label",1)
    … …  
    5759            outPath = "output.curve(f13).component.xy"
    5860
     61            outPath2 = "output.curve(f14).about.group"
     62            call rp_lib_put_str(handle,outPath2,"group1",1)
     63            outPath2 = "output.curve(f14).component.xy"
     64
     65            outPath3 = "output.curve(f15).about.group"
     66            call rp_lib_put_str(handle,outPath3,"group1",1)
     67            outPath3 = "output.curve(f15).component.xy"
     68
    5969            do 16,E = Emin,Emax,dE
    6070                f = -1.0/(1.0+exp((E-Ef)/kT))
    6171                write(xy,'(E20.12,F13.9,A)')f,E,char(10)
    6272                call rp_lib_put_str(handle,outPath,xy,1)
     73                f = -4.0/(1.0+exp((E-Ef)/kT))
     74                write(xy,'(E20.12,F13.9,A)')f,E,char(10)
     75                call rp_lib_put_str(handle,outPath2,xy,1)
     76                f = 1.0/(1.0+exp((E-Ef)/kT))
     77                write(xy,'(E20.12,F13.9,A)')f,E,char(10)
     78                call rp_lib_put_str(handle,outPath3,xy,1)
    6379 16         continue
    6480

  • trunk/examples/fermi_fortran/tool.xml

    r30 r36  
    88        <group id="ambient">
    99            <number id="temperature">
    10                 <label>Ambient temperature</label>
     10                <about>
     11                    <label>Ambient temperature</label>
     12                </about>
    1113                <units>K</units>
    1214                <min>120K</min>
    … …  
    2830        </group>
    2931        <number id="Ef">
    30             <label>Fermi Level</label>
     32            <about>
     33                <label>Fermi Level</label>
     34            </about>
    3135            <units>eV</units>
    3236            <min>-10eV</min>
Note: See TracChangeset for help on using the changeset viewer.