Language peer sets for VICAR: United States↑ United States/1966↑ Designed 1966 ↑ 1960s languages ↑ Third generation↑ High Cold War↑ Genus AV-Control ↑ Specialised Languages ↑ AV-Control↑ AV-related↑ Phenomenological ↑ AV-Control/1966↑ AV-related/1966↑ Phenomenological/1966↑ AV-Control/United States↑ AV-related/United States↑ Phenomenological/United States↑ Specialised Languages ↑ Specialised Languages/1966↑ Specialised Languages/us ↑
VICAR(ID:5460/)
NASA image manipulation language
alternate simple view
Country: United States
Designed 1966
Genus: AV-Control
Sammet category: Specialised Languages for Video Information Communication and Retrieval language
Samples:
taken from "Help for TFILT0" at http://www-mipl.jpl.nasa.gov/~pma/vicarhlp/tfilt0_description.html
GEN OUT=GEN NL=20 NS=17 ! generate a picture with byte format GEN OUT=HST NL=20 NS=22 'HALF ! generate a scratch file with halfword format LIST INP=GEN 'ZEROES ! check input data TFILT0 INP=(GEN,IST) OUT=TEST1 !run TFILT0 - default all optional params. LIST INP=TEST1 'ZEROES TFILT0 INP=(GEN,IST) OUT=TEST2 ! run TFILT0 with byte LIST INP=TEST2 'ZEROES ! run TFILT0 with byte and nlw TFILT0 INP=(GEN,IST) OUT=TEST4 NLW=3 LIST INP=TEST4 'ZEROES ! run TFILT0 with byte, nls and nsw TFILT0 INP=(GEN,IST) OUT=TEST6 NLW=2 NSW=3 LIST INP=TEST6 'ZEROES ! run TFILT0 with byte, nls, nsw and thresh TFILT0 INP=(GEN,IST) OUT=TEST7 NLW=2 NSW=3 THRESH=3 LIST INP=TEST7 'ZEROES ! run TFILT0 with nlw, nsw, thresh and high TFILT0 INP=(GEN,IST) OUT=TEST8 NLW=3 NSW=3 THRESH=3 'HIGH LIST INP=TEST8 'ZEROES ! run TFILT0 with thresh, scene TFILT0 INP=(GEN,IST) OUT=TEST9 THRESH=2 'SCENE LIST INP=TEST9 'ZEROES TFILT0 INP=(GEN,IST) OUT=TEST10 NLW=4 'LOW !run TFILT0 with nlw and low LIST INP=TEST10 'ZEROES TFILT0 INP=(GEN,IST) OUT=TEST11 'DIVIDE ! run TFILT0 with divide LIST INP=TEST11 'ZEROES ! run TFILT0 with nlw and high - define boost,dctran, dclevel TFILT0 INP=(GEN,IST) OUT=TEST12 NLW=2 'HIGH BOOST=2 DCTRAN=0.1 DCLEVEL=50.0 LIST INP=TEST12 'ZEROES !run TFILT0 with nlw, nsw, and low - define boost and offset TFILT0 INP=(GEN,IST) OUT=TEST14 NLW=2 NSW=4 'LOW BOOST=2.00 OFFSET=20. LIST INP=TEST14 'ZEROES ! run TFILT0 with halfword and nsw GEN OUT=HGEN NL=20 NS=22 'HALF !generate a picture with halfword format LIST INP=HGEN 'ZEROES TFILT0 INP=(HGEN,HST) OUT=TEST3 ! run TFILT0 with halfword LIST INP=TEST3 'ZEROES TFILT0 INP=(HGEN,HST) OUT=TEST5 NSW=2 LIST INP=TEST5 'ZEROES !run TFILT0 with halfword,nlw,nsw,thresh,scene,scale,dctran and dclevel TFILT0 INP=(HGEN,HST) OUT=TEST13 NLW=2 NSW=2 THRESH=3 'SCENE+ SCALE=200.0 DCTRAN=0.3 DCLEVEL=10 LIST INP=TEST13 'ZEROES OPERATION
References:
(1987) "Computers in Spaceflight: The NASA Experience"
Extract:
VICARExtract:
HYLA, ATOLL, SOL
LaVoie, S., C. Avis, H. Mortensen, C. Stanley, and (1987) LaVoie, S., C. Avis, H. Mortensen, C. Stanley, and L. Wainio "VICAR User'sGuide, Version 1," D-4186, Jet Propulsion Laboratory, California Institute of Technology, Pasadena, CA, 1987.
Susan LaVoie et al (1994) Susan LaVoie et al "Vicar's User Guide V 3" Jet Propulsion Laboratory California Institute of Technology Pasadena, 1994
Online copy Resources