<\/p>\n\n\n\n
<\/p>\n\n\n\n
Kuchela Day = First WED in Dhanu<\/p>\n\n\n\n
input” YEAR ” to myear<\/p>\n\n\n\n
set cent on
set date brit<\/p>\n\n\n\n
use ahasx<\/p>\n\n\n\n
loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2<\/p>\n\n\n\n
use long20
go top<\/p>\n\n\n\n
locate for lsun > 239 .and. lsun < 240 .and. ahargana > ah1 .and. ahargana < ah2<\/p>\n\n\n\n
?lsun
?ah1
?ah2<\/p>\n\n\n\n
store recno() to re
go re
?re<\/p>\n\n\n\n
loca for day=”Wed” .and. recno() > re<\/p>\n\n\n\n
store date to dt<\/p>\n\n\n\n
?date<\/p>\n","protected":false},"excerpt":{"rendered":"
Kuchela Day = First WED in Dhanu input” YEAR ” to myear set cent onset date brit use ahasx loca for myear = yearstore ahargana to ah1skipstore ahargana to ah2 use long20go top locate for lsun > 239 .and. lsun < 240 .and. ahargana > ah1 .and. ahargana < ah2 ?lsun?ah1?ah2 store recno() to rego … <\/p>\n