home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 February / PCWK0297.iso / technika / formcalc / optics / optc405.equ < prev    next >
Text File  |  1993-10-17  |  2KB  |  18 lines

  1. "AST1CAL3 EQUATION VARIABLE","10-17-1993","12:04:39"
  2. "OBJECT_DISTANCE=S[O]+(1-SIGN(ABS(S[O])))*N[1]*R*S[I]/(S[I]*(N[2]-N[1])-N[2]*R) IMAGE_DISTANCE=S[I]+(1-SIGN(ABS(S[I])))*N[2]*R*S[O]/(S[O]*(N[2]-N[1])-N[1]*R) INDEX_1=N[1]+(1-SIGN(ABS(N[1])))*N[2]*S[O]/(S[I]+1E-30)*(S[I]-R)/(S[O]+R+1E-30) INDEX_2=N[2]+(1-SIGN(ABS(N[2])))*N[1]*S[I]/(S[O]+1E-30)*(S[O]+R)/(S[I]-R+1E-30) RADIUS=R+(1-SIGN(ABS(R)))*(N[2]-N[1])/(N[1]/(S[O]+1E-30)+N[2]/(S[I]+1E-30))"
  3. "SPHERICAL REFRACTING SURFACES, PARAXIAL RAYS.                  A diagram of the Problem is shown below. Surface is represented by 's'.                                 s                                                                         A · o·                S = source             N[1] = index              L[O]  ·    s  ·  · L[I]        V = vertex of sphere          outside    S    .            s   R·    ·          P = image              N[2] = index        ·· · · · · · ·o· · · o · · ·o P     L[O] = distance S to sphere   inside                     V|s    C       |       L[I] = distance sphere to P                      N[1]     | s      N[2] |       S[O] = distance S to vertex                               |   s         |       S[I] = distance vertex to image            |----S[O]------|----S[I]-----|       C = center of sphere  R = radius curvat.                                               (c) Copyright PCSCC, Inc., 1993  Sign Convention:  S[O] + means its left of vertex V                                               S[I] + means its right  of vertex V                                             R    + means center C is right of V                           *** Answer(s) to problem ***                                                    Variables are set to proper values at entry.  Note, value of unknown should be  set to 0.0.  Enter any 4 of 5 knowns, program calculates missing (=0) one.      S[I] = 10.7. Image is real and to right of V.  Type any key to exit.                           ||The input end of a wide glass (Ng=1.6) fiber is ground to a    convex hemisphere of 1.5 cm radius.  (a) If a point source is located 4 cm to   the left of the hemisphere's vertex, where will its image be?                        Type comma key to see answer. Type (F2) to return to application file."
  4. 10
  5. 4,0,""
  6. 10.66666666666667,0,""
  7. 1,0,""
  8. 1.6,0,""
  9. 1.5,0,""
  10. 4,0,""
  11. 1.6,0,""
  12. 1,0,""
  13. 0,0,""
  14. 1.5,0,""
  15. 1
  16. 0
  17. 0
  18.