'PARAM.INC

'****************************************************************************
'This file contains all the parameters of the magnet test.  It also contains
'parameters defined in the program such as filenames.  Such parameters
'are put in common blocks.
'
'Zachary Wolf
'4/16/94
'****************************************************************************

'DATA AND LOG FILES

'Make file names common to all procedures
COMMON SHARED /filenames/ logfileP$

'GPIB

'Make GPIB input and output files common to all procedures
COMMON SHARED /gpib/ gpibinP%, gpiboutP%

'Define the GPIB addresses
CONST hp3457addrP% = 22      'HP3457A DVM GPIB address
CONST dac488hraddrP% = 10    'IOTech DAC488HR/2 GPIB address

'TEST PARAMETERS

'Put the test parameters in a common block
COMMON SHARED /testparam/ magnameP$, teststandP$, operatorP$, runP$, commentP$

'COIL VOLATGE PARAMETERS

'Define the measurement parameters
CONST vcoilnptsP% = 250      'the number of voltage samples the DVM takes
CONST vcoildeltatP! = .015   'the time interval between samples
CONST vcoilnaveP% = 5        'the number of ivdt measurements for average

'Define the HP3457 channels for the coils
CONST coil0chanP% = 0        'channel # for coil 0
CONST coil1chanP% = 1        'channel # for coil 1
CONST coil2chanP% = 2        'channel # for coil 2

'MAGNET CURRENT PARAMETERS

'Define the magnet current ramp
CONST imagramprateP! = 10    'power supply amperes per second during a ramp

'Define the magnet current control
CONST imagpervdacP! = 200    'power supply amps per DAC volt

'Define the magnet current measurement parameters
CONST imagchanP% = 3         'the HP3457 channel for the transductor voltage
CONST vtransperimagP! = .005    'transductor volts per magnet amp