1: !
  2: !
  3: !  Include file for Fortran use of the PetscDraw package in PETSc
  4: !
 5:  #include finclude/petscdrawdef.h
  6: !
  7: !  Flags for draw
  8: !
  9:       PetscEnum PETSC_DRAW_BASIC_COLORS
 10:       PetscEnum PETSC_DRAW_ROTATE
 11:       parameter (PETSC_DRAW_BASIC_COLORS=33,PETSC_DRAW_ROTATE=-1)
 12: !
 13: !  Colors for drawing
 14: !
 15:       PetscEnum PETSC_DRAW_WHITE
 16:       PetscEnum PETSC_DRAW_BLACK
 17:       PetscEnum PETSC_DRAW_RED
 18:       PetscEnum PETSC_DRAW_GREEN
 19:       PetscEnum PETSC_DRAW_CYAN
 20:       PetscEnum PETSC_DRAW_BLUE
 21:       PetscEnum PETSC_DRAW_MAGENTA
 22:       PetscEnum PETSC_DRAW_AQUAMARINE
 23:       PetscEnum PETSC_DRAW_FORESTGREEN
 24:       PetscEnum PETSC_DRAW_ORANGE
 25:       PetscEnum PETSC_DRAW_BROWN
 26:       PetscEnum PETSC_DRAW_PINK
 27:       PetscEnum PETSC_DRAW_CORAL
 28:       PetscEnum PETSC_DRAW_GRAY
 29:       PetscEnum PETSC_DRAW_YELLOW
 30:       PetscEnum PETSC_DRAW_GOLD
 31:       PetscEnum PETSC_DRAW_LIGHTPINK
 32:       PetscEnum PETSC_DRAW_MEDIUMTURQUOISE
 33:       PetscEnum PETSC_DRAW_KHAKI
 34:       PetscEnum PETSC_DRAW_DIMGRAY
 35:       PetscEnum PETSC_DRAW_SKYBLUE
 36:       PetscEnum PETSC_DRAW_DARKGREEN
 37:       PetscEnum PETSC_DRAW_NAVYBLUE
 38:       PetscEnum PETSC_DRAW_SANDYBROWN
 39:       PetscEnum PETSC_DRAW_CADETBLUE
 40:       PetscEnum PETSC_DRAW_POWDERBLUE
 41:       PetscEnum PETSC_DRAW_DEEPPINK
 42:       PetscEnum PETSC_DRAW_THISTLE
 43:       PetscEnum PETSC_DRAW_LIMEGREEN
 44:       PetscEnum PETSC_DRAW_LAVENDERBLUSH
 45:       PetscEnum PETSC_DRAW_PLUM
 46:       PetscEnum PETSC_DRAW_YELLOWGREEN
 47:       PetscEnum PETSC_DRAW_VIOLET

 49:       parameter (PETSC_DRAW_WHITE = 0,PETSC_DRAW_BLACK = 1)
 50:       parameter (PETSC_DRAW_RED = 2,PETSC_DRAW_GREEN = 3)
 51:       parameter (PETSC_DRAW_CYAN = 4,PETSC_DRAW_BLUE = 5)
 52:       parameter (PETSC_DRAW_MAGENTA = 6,PETSC_DRAW_AQUAMARINE = 7)
 53:       parameter (PETSC_DRAW_FORESTGREEN = 8,PETSC_DRAW_ORANGE = 9)
 54:       parameter (PETSC_DRAW_VIOLET = 10,PETSC_DRAW_BROWN = 11)
 55:       parameter (PETSC_DRAW_PINK = 12,PETSC_DRAW_CORAL = 13)
 56:       parameter (PETSC_DRAW_GRAY = 14,PETSC_DRAW_YELLOW = 15)
 57:       parameter (PETSC_DRAW_GOLD = 16,PETSC_DRAW_LIGHTPINK = 17)
 58:       parameter (PETSC_DRAW_MEDIUMTURQUOISE = 18)
 59:       parameter (PETSC_DRAW_KHAKI = 19)
 60:       parameter (PETSC_DRAW_DIMGRAY = 20)
 61:       parameter (PETSC_DRAW_YELLOWGREEN = 21)
 62:       parameter (PETSC_DRAW_SKYBLUE = 22)
 63:       parameter (PETSC_DRAW_DARKGREEN = 23)
 64:       parameter (PETSC_DRAW_NAVYBLUE = 24)
 65:       parameter (PETSC_DRAW_SANDYBROWN = 25)
 66:       parameter (PETSC_DRAW_CADETBLUE = 26)
 67:       parameter (PETSC_DRAW_POWDERBLUE = 27)
 68:       parameter (PETSC_DRAW_DEEPPINK = 28)
 69:       parameter (PETSC_DRAW_THISTLE = 29)
 70:       parameter (PETSC_DRAW_LIMEGREEN = 30)
 71:       parameter (PETSC_DRAW_LAVENDERBLUSH =31)
 72:       parameter (PETSC_DRAW_PLUM = 32)

 74:       PetscEnum PETSC_BUTTON_NONE
 75:       PetscEnum PETSC_BUTTON_LEFT
 76:       PetscEnum PETSC_BUTTON_CENTER
 77:       PetscEnum PETSC_BUTTON_RIGHT
 78:       PetscEnum PETSC_BUTTON_LEFT_SHIFT
 79:       PetscEnum PETSC_BUTTON_CENTER_SHIFT
 80:       PetscEnum PETSC_BUTTON_RIGHT_SHIFT

 82:       parameter (PETSC_BUTTON_NONE = 0,PETSC_BUTTON_LEFT = 1)
 83:       parameter (PETSC_BUTTON_CENTER = 2,PETSC_BUTTON_RIGHT = 3)
 84:       parameter (PETSC_BUTTON_LEFT_SHIFT = 4)
 85:       parameter (PETSC_BUTTON_CENTER_SHIFT = 5)
 86:       parameter (PETSC_BUTTON_RIGHT_SHIFT = 6)

 88: !
 89: !  End of Fortran include file for the PetscDraw package in PETSc