Doxygen Source Code Documentation
zzphys.c File Reference
#include "f2c.h"Go to the source code of this file.
| Defines | |
| #define | zzzplt_1 zzzplt_ | 
| #define | zzpltr_1 zzpltr_ | 
| Functions | |
| int | zzphys_ (real *x, real *y) | 
| Variables | |
| struct { | |
| real xpgmin | |
| real ypgmin | |
| real xpgmax | |
| real ypgmax | |
| real xclbot | |
| real yclbot | |
| real xcltop | |
| real ycltop | |
| real xbot | |
| real ybot | |
| real xtop | |
| real ytop | |
| real xmin | |
| real ymin | |
| real xmax | |
| real ymax | |
| integer ixcoor | |
| integer iycoor | |
| real alphxx | |
| real betaxx | |
| real alphyy | |
| real betayy | |
| real tmajx | |
| real tminx | |
| real tmajy | |
| real tminy | |
| integer majrx | |
| integer minrx | |
| integer majry | |
| integer minry | |
| integer isizx | |
| integer isizy | |
| real xphold | |
| real yphold | |
| } | zzzplt_ | 
| struct { | |
| real xphmax | |
| real yphmax | |
| integer ixpmax | |
| integer iypmax | |
| real xpscal | |
| real ypscal | |
| integer iflip | |
| integer nplotr | |
| char cfile [64] | |
| } | zzpltr_ | 
Define Documentation
| 
 | 
| 
 | 
| 
 | 
| 
 Definition at line 19 of file zzphys.c. Referenced by zzphys_(). | 
Function Documentation
| 
 | ||||||||||||
| 
 Definition at line 34 of file zzphys.c. References dabs, r_lg10(), and zzzplt_1. Referenced by frstpt_(), line_(), plotpak_zzphys(), point_(), pwrit_(), pwritf_(), vector_(), zzaxxx_(), and zzaxyy_(). 
 00035 {
00036     /* System generated locals */
00037     real r__1;
00038 
00039     /* Builtin functions */
00040     double r_lg10(real *);
00041 
00042 
00043 /*  Convert user to physical coordinates. */
00044 /* .......................................................................
00045  */
00046 /* +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
00047  */
00048 
00049 /*  Internal Data for PLOTPAK */
00050 
00051     if (zzzplt_1.ixcoor < 0) {
00052         r__1 = dabs(*x) + 1e-37f;
00053         *x = r_lg10(&r__1);
00054     }
00055     *x = zzzplt_1.alphxx * *x + zzzplt_1.betaxx;
00056 
00057     if (zzzplt_1.iycoor < 0) {
00058         r__1 = dabs(*y) + 1e-37f;
00059         *y = r_lg10(&r__1);
00060     }
00061     *y = zzzplt_1.alphyy * *y + zzzplt_1.betayy;
00062 
00063     return 0;
00064 } /* zzphys_ */
 | 
Variable Documentation
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
| 
 | 
 
                             
                             
                             
                             
                             
                             
                             
                             
                             
                             
                             
                             
 
 
 
 
       
	   
	   
	   
	  