PROGRAM test_std_anemometer_init use anemometer_def call std_anemometer_init() print *, "std_anemometer_init values ", anemHght, aeroRougStatHght, dispHghtWeatStat, aeroAnemFlg STOP END PROGRAM